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PREFACE 

Programming in machine and assembly language is one of those 
things that everyone would like to be able to do. Machine 
language is extremely fast and versatile. Many people try to 
learn it, but most quickly give it up because it is too 
complicated. Only a few actually use it. 

With this book we want to make it possible for thousands of 
Commodore 64 users to use machine language. We have enlisted 
the services of Lothar Englisch as author for this purpose. 
Not only has he worked on many of our other books, but he is 
also well acquainted with the Commodore operating systems 
and programming for all models of the Commodore computers in 
both machine language and assembler. 

To get the most out of machine language programming, you 
must concentrate on the following chapters. We think that 
you will be rewarded in the end. 

Have fun with this book and much success with your own 
machine language programs. 
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1. INTRODUCTION 

Why use machine language? — Advantages and disadvantages of 
programming in machine language 

Today, when you purchase a home or personal computer such as 
the Commodore 64, you have the BASIC programming language 
available as soon as you turn your computer on. With BASIC 
you can perform almost all of the tasks needed in home 
computing, it is easy to learn to program in BASIC. Why 
then, should you bother with machine language? Isn't it just 
a relic from the Dark Ages of computing? 

Let's compare BASIC to machine language. 

Most of us have mastered BASIC and know that it's not very 
difficult to learn. In this book we'll try to convince you 
that programming in machine language is almost as easy to 
learn. If you already know BASIC, then you have a headstart. 
The fundamentals of programming in machine language are not 
much different. 

What advantages over BASIC justify that you learn a new 
programming language? 

Your Commodore 64 comes with the BASIC programming language 
built-in. BASIC is an acronym for Beginner's All Purpose 
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Symbolic Instruction Code and despite its ease of mastery, 
it is quite capable of performing most home computing tasks. 
BASIC is a high level programming languages like FORTRAN, 
Pascal, and COBOL. These languages are often called problem- 
oriented languages because they are intended to be used for 
solving problems in various fields such as mathematics, 
science or business. The counterpart of problem-oriented 
languages are the machine-oriented languages such as FORTH, 
and require a more detailed knowledge of the computer 
hardware. Machine language is the extreme member of this 
category of languages. 

By itself, the Commodore 64 cannot understand BASIC at all. 
How can it execute the BASIC commands that you type in at 
the keyboard if it doesn't speak BASIC? The Commodore 64 
contains an "operating system" which includes a BASIC 
interpreter. This interpreter converses with you in BASIC. 
The Commodore 64 converts the BASIC commands and statements 
into a series of executable machine language instructions. 
You don't even see this happening. It takes place 
"automat ically" . 

Let's take a look at a simple example of how the BASIC 
interpreter works: 

PRINT "HELLO" 
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When you enter this statement and press <RETURN>, the 
interpreter reads the line character by character. 
One of the jobs of the interpreter is to recognize the 
commands (also called keywords) that make up the BASIC 
language. When it finds the first word in the line (PRINT), 
the interpreter looks in its command table to determine if 
the word is a BASIC keyword. The command table contains all 
of the BASIC keywords: GOTO, FOR, INPUT, PRINT, etc. 
Associated with each BASIC keyword is the location of the 
routine in the Commodore 64 operating system which performs 
the actions required by that BASIC keyword. Below is a 
simplified example of the command table: 



BASIC 
KEYWORD 

GOTO 

IF 

INPUT 



MEMORY LOCATION WHICH 
PERFORMS REQUIRED ACTIONS 

43168 
43304 
43967 



PRINT 



43680 



If the interpreter finds the keyword in the command table, 
it knows what part of the operating system is to carry out 
that BASIC command, in our example, the interpreter searches 
the command table for the word PRINT. It finds the keyword 
and notes that the memory location which performs the PRINT 
statement begins at location 43680. Therefore, the 
interpreter lets the "program" segment (usually called a 
routine or machine-language routine) located at 43680 
perform the PRINT command. 
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The routine at 43680 continues to read more of that same 
line - also character by character. Next it Einds a 
quotation mark which tells PRINT routine that text follows. 
According the the rules of BASIC, the Commodore 64 echos 
onto the screen each of the next characters up to the ending 
quotation mark. So the word HELLO appears on the screen. If 
no additional characters appear on the line following the 
ending quotation mark, the routine knows that its job is 
complete and responds with READY. The BASIC interpreter is 
now ready for another command. 

This may appear very complicated and you may be telling 
yourself that there must be an easier way. But this is 
exactly the purpose of the BASIC interpreter — to insulate 
you from the drudgery and hard work of machine language. Why 
then learn machine language? 

Machine language is considerably faster than BASIC. 

What speed advantages does machine language have over BASIC 
and what accounts for this advantage? In order for your 
computer understand BASIC, is has a BASIC interpreter which 
recognizes and executes individual BASIC commands. The 
interpreter itself is written in machine language. 

To perform a simple BASIC command, the interpreter must do 
several things. A simple BASIC statement is POKE 1024,10. 
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The interpreter searches for the first word in the 

statement; it finds the keyword POKE in its command table; 
it knows to expect two arguments; it finds the first 
argument 1024 and converts it to binary (remember that the 
computer works in binary); it finds the second argument 10 
and converts it to binary; it writes this second value into 
the location specified by the first argument. This statement 
takes about two milliseconds or 2 thousandths of a second to 
perform. 

How can you do the same task in machine language? You can 
peform the same thing with two instructions; 



LDA #10 
STA 1024 



These two instructions take six microseconds or 6 millionths 
of a second. This is less than l/300th the time as BASIC. 

A machine language program is from 10 to 1000 times faster 
than an equivalent program written in BASIC. 

Some tasks such as sorting or calculating mathematical 
formula are very time-consuming. If there are large amount 
of data, these tasks may easily take hours to complete using 
the BASIC language. Substituting a fast machine language 
program would be welcome in such a situation. 
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Some tasks cannot be performed using BASIC. An example is 
attending to the "interrupts" that temporarily require the 
Commodore 64 to stop what it's doing to see if the RUN/STOP 
key is pressed. Servicing interrupts must be done by a 
machine language routine. 

This means that you cannot utilize the full capabilities of 
the Commodore 64 without machine language. This is 
especially true for high resolution graphics and the music 
synthesizer on the Commodore 64. 

Another important point about machine language programming 
is its use of memory. A well-written machine language 
program may be ten times smaller than an equivalent BASIC 
program. A IK program written in BASIC is not very large; 
but a IK program written in machine language is large. 

The same holds true for data storage. You can create and 
maintain compact data structures in machine language that 
are not possible in BASIC. For example, BASIC requires two 
bytes to represent integer values between and 255. In 
machine language, you can represent integer values between 
and 255 in one byte for each variable. Thus one-half of the 
storage space for such values is wasted using BASIC. Machine 
language lets you choose the most optimal data structure for 
each problem. 

To be fair, there are disadvantages to using machine 
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language. First, you must learn how to program in machine 
language. If you have already mastered BASIC, then you have 
the fundamentals under your belt. But you also need some 
tools that let you easily write and work with machine 
language programs. This book contains the listings for 
several such tools. 

Another disadvantage of machine language is that these pro- 
grams can run only on the model computers for which they are 
written, and require substantial changes to run on a 
different model. Most BASIC programs are more easily 
transportable to other computers. 

Testing machine language programs is another difficulty 
unless you have the appropriate tools. We have included the 
listing for a 6510 simulator program that not only teaches 
you the machine language instructions but helps you find 
errors in your programs. 

Although machine language programming has some drawbacks, 
many tasks cannot be solved without machine language and 
many others require you to get the last bit of performance 
from your computer. 

After you have written your first machine language program, 
you'll see that it isn't so difficult. We hope that you find 
the lessons of this book helpful and that they inspire you 
to solve your own computing problems in machine language. 
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2. The 6510 Microprocessor 

Before you begin programming in machine language, you need 
to become acquainted with the processor itself. Let's 
clarify some terms first. We'll begin with the construction 
of the processor. 

The 6510 microprocessor belongs to the family of 65>X 
processors that are found in most Commodore computers. The 
6510 processor contains a set of registers which are used by 
all operations. 

How can we describe the registers? 

A microprocessor works digitally. It can only distinguish 
between two conditions. We can think of these two conditions 
like a switch which can be either on and off {or 1 and 0). 
A single switch can have only two states. By itself a switch 
is not very useful, so multiple switches are combined into 
registers. 

A single switch in the processor is called a bit (from 
b_inary digiO. A group of eight bits is called a byte. The 
registers of the 6510 processor contains a'group of eight 
bits (or one byte) is arranged like this: 



bit number 76543210 (power of 2] 

contents 110 10 1 

FIG 2.1 
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The upper row illustrates the bit numbering convention that 
is commonly used throughout this hook. The bits are numbered 
from zero to seven. Beneath each bit number are the contents 
of the bits; either a or a 1 . While a bit can represent 
two conditions (and therefore only two values), you can 
represent a larger range with 8 bits. 

Here's the numbering system that you are most familiar with 
- the decimal system. 



decimal position 3 2 10 (power of 10) 

contents 5 7 2 4 

FIG 2.2 



These positions are also numbered, this time from zero to 
three. 

How do you calculate the value of this number? 
Each digit has a value between zero and nine and the next 
position has a value ten times greater. Starting from the 
rightmost decimal position: 

4*10° + 2M0 1 + 7*10 2 + 5*10 3 

4 + 2*10 + 7*10*10 + 5*10*10*10 

4 + 2*10 + 7*10(1 + 5*1000 

4 + 20 + 700 + 5000 

= 5724 
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Likewise, you can determine the contents of the registers 
using the binary number system. They are called binary 
numbers because each position allows two values instead of 
ten. Accordingly, the next highest position is not ten times 
greater, but only twice the previous value. So you can 
calculate the contents of the register: 

1*2° + u'2 1 + 0*2 2 + 1*2 3 + D*2 4 + 1*2 5 + 1*2 6 + 0*2 7 

= 1*1 + 0*2 + 0*4 + 1*8 + 0*16 + 1*32 + 1*64 + 0*128 

1 + +0 +8 +0 +32 + 64+ 
= 105 



Thus the contents of the register in FIG 2.1 is 105. These 
troublesome calculations can be simplified, if you first 
calculate the value of each bit position. This is analagous 
to memorizing the decimal positions, 



A 1 in 
this is equivalent 

bit to this 

pos it ion decimal value 





1 
2 
3 

■; 

•■■ 

E 
7 

10 



, ,: 


= 


I 


z- 


= 


2 


2 2 


= 


4 


2 3 


= 


8 


2* 


= 


16 


2 5 


= 


32 


2 6 


= 


64 


2 7 


^ 


128 
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what is the maximum value of the register? If all of the bit 
positions of the register have the value one, their sum 
yields 1+2+4+8+16+32+64+ 128 = 255. The 
greatest value that can be represented in eight bits is 255. 
So a total of 256 (0 thru 255) different values can be 
represented in a register. 

But binary numbers are tedious to manipulate. For this 
reason, an alternative representation is introduced. It 
requires fewer digits and is therefore more convenient to 
use. If you divide an 8-bit binary number into two 4-bit 
binary numbers, each 4-bit number can represent 16 different 
values. If you construct a number system with 16 different 
digits, then you can express each 8-bit binary number with 
just two digits. 



bit position 7654 3210 

binary contents 0110 1001 

hexadecimal contents 6 9 

FIG 2.3 



The hexadecimal (base 16) numbering system uses 16 different 
digits for this purpose. Each byte is divided into two half- 
bytes, called nybbles. A nybble can have values from to 
15, but the decimal number system only has digits from to 
9. In the hexadecimal number system, the digits from 10 thru 
15 are represented by the letters A thru F. The hexadecimal 
digits are arranged like this: 
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This Is equivalent And has 

Binary to this this decimal 

Nybbl e Hex digit value 

OGD'u 5 

0001 1 1 

0010 2 2 

0011 3 3 

0100 4 4 

0101 5 5 

0110 6 6 

0111 7 7 

1000 8 8 

1001 9 9 

1010 A 10 

1011 B 11 

1100 C 12 

1101 D 13 

1110 E 14 

1111 F 15 



For the example in FIG 2.3, the contents of the register 
have a hexadecimal value 69. In order to distinguish between 
the various number systems, you denote a hexadecimal number 
with a preceding dollar sign $, and a binary number with a 
preceding percent sign %. 

Appendix C is a Decimal, Hexadecimal, 3inary conversion 
table. The remainder of this book uses hexadecimal numbers 
most often, since it is easily r e p r e s e n t a b 1 e and 
convertable into the binary representation of the processor. 

Now let's take a look at the microprocessor registers. 

The 6510 has a total of six registers, five are eight-bit 
registers and the sixth is a sixteen-bit register. Let's 

12 
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examine the registers individually. 

The accumulator is the ,-nost important register in the 
microprocessor. It is the universal working register, used 
for almost all operations. All arithmetic and logical 
operations, and almost all of the comparison instructions 
use the accumulator. 

The X-register is the second register in the processor. This 
register is used together with the accumulator when working 
with tables. It functions as the counter or pointer to the 
individual table elements. For this reason this register is 
also called an index register. 

The Y-register is an index register like the X-register and 
serves similar purposes. 

The program counter is a 16-bit register. Its contents 
indicate the memory location from which the next instruction 
is to be executed. This register is managed by the 
microprocessor itself. Normally, you do not have direct 
control over the contents of this register. 

The stack pointer points to an area of memory called the 
stack which is used for subroutines and for short-term data 
storage. The stack is described in detail later. 

The processor status register gives information about the 

13 
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result of the last executed instruction. This register is 
the foundation for the decision making and conditional 
branching instructions. Seven of the eight bits of the 
status register are used as flags. You can examine and 
conditionally branch depending on the setting of a 
particular flag. A flag can be either set (=1) or clear 
(=0). The processor status register is made of the following 
f lags: 



bit position 76543210 

flag type NV-BDIZC 



The letters are abbreviations for the names of the flags, 
and have the following meanings: 

C - Carry The carry flag contains the carry generated 
by an addition, and is set if the result is greater 
than 255 and therefore cannot be contained in eight 
bits of the accumulator. 

Z - Zero The zero flag is set if the result of an 
operation is zero. 

I - Interrupt Disable This flag determines if 
interrupts are permitted in a program. This flag 
does not interest us at the moment. 
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D - Decimal The decimal flag determines if arithmetic 
is carried out in the decimal mode. 

B - Break The break flag indicates if execution was 
halted by a BRK instruction. 

V - overflow The V flag indicates overflow when 
calculating with signed numbers. 

N - Negative This flag is set if the result of an 
operation results in a value greater than 127 (bit 
7 is set). The designation negative comes from the 
fact that values over S7F can be interpreted as 
negative numbers. 



A microprocessor must have a place to get data and store 
data. The computer's memory serves this purpose. Memory is 
divided into individual cells containing 8 bits each, the 
same size as the accumulator and X and Y registers. In order 
to access the memory, it must be possible to select a 
specific memory location. This selection is called 
addressing memory. We give each memory location a number or 
address. With 8 bits, the microprocessor can address cells 
from to 255 for a total of 256 memory cells. This is far 
too few for most applications. For this reason, the micro- 
processor uses 16-bits for the address, with 16 bits, the 
microprocessor can address 2 16 ■ 65536 memory locations. 
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This is called a 16-bit address bus. To summarize - a) the 
6510 microprocessor can address 65536 memory locations; b) 
each memory location can contain a value from to 255. For 
ease of handling, 2 10 = 1024 bytes is called a kilobyte or 
IK. Therefore, the processor can address 64*1024 = 65536 or 
64K. This is the entire address range of the Commodore 64. 

Now you can understand the significance of the program 
counter. The program counter contains a 16-bit value. This 
16-bit value is the address of the next instruction that the 
microprocessor is to fetch from memory and execute. 

An instruction for the microprocessor can be represented by 
a value between and 255. The 6510 microprocessor can have 
a maximum of 256 different instructions. However, not all 
the codes have a meaning on the 6510; fewer than 256 
instructions exist. BASIC commands are naturally not 
i nc 1 uded . 



16 



The Machine Language Book of the Commodore 64 

3. instructions and Addressing Modes of the 6510 

Of the 256 possible 8-bit codes, 151 are legal instructions 
for the 6510. These include several similar instructions, 
that are different only by addressing mode. There are only 
56 entirely different instructions on the 6510. These 
instructions are easy to learn. They are introduced to you 
in groups. 

An instruction is represented in the computer as an 8-bit 
binary number. Each particular machine language instruction 
has a specific binary value. The microprocessor knows what 
actions to take based on this binary value. 

Machine language instructions are given mnemonic- names, A 
mnemonic is a three character abbreviation for a machine 
language operation. For example, the mnemonic LDA stands for 
LoaD Accumulator. These mnemonics will become more familiar 
to you as we discuss them throughout the book. 

Now let's take a look at the specific instructions: 
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A. The LOAD instructions 

The LOAD instructions get data from memory and place it 
into a register. There are three working registers in the 
processor (the accumulator, the X-register and the Y- 
register). Each has a corresponding load instructions. 



LDA LoaD Accumulator 
LDX LoaD X register 
LDY LoaD Y register 



The 6510 processor has different addressing modes. An 
addressing mode tells the 6510 how to calculate the 
address (or location) of the operand. 

In the examples that follow, we show you corresponding 
"pseudo-BASI C" statements to illustrate the machine 
langauge instructions in a familiar notation. 

1) Immediate Addressing 

LDA #10 
This addressing mode is indicated by the pound sign 
t preceding the value to be loaded, immediate 
addressing means that the accumulator is loaded 
with the value which follows it, in this case 10. 
The corresponding pseudo-BASIC instruction is: 



A=10 
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This addressing mode is used to load a register 
with a constant. It also works with the X and Y 
reg isters : 

LDX #S7F or LDY #0 



Here the X-register is loaded with the value S7F 
(127 in decimal) and the Y-register with the value 
zero ( ) . 

when using the immediate addressing mode, the value 
to be loaded is part of the program. The 
instruction and the value are placed one after the 
other in two adjacent memory locations. For 
example, if the machine language program is located 
at address 1200, the program counter contains the 
value 1200. The 6510 microprocessor gets the 
intruction at 1200 and sees that its value is SA9 
or decimal 169. It knows that the instruction is 
LDA i. So it places the contents contained in the 
next memory location 1201 into the accumulator (see 
diagram which follows). Since this instruction 
consists of two bytes - the instruction itself and 
the value to be loaded - the processor 
automatically increments the program counter by 
two. The program counter then points to the next 
instruction to be executed by the microprocessor 
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starting at 1202. 

contents — > 

address > 1200 1201 1202 

2) Absolute Addressing 

This addressing mode is used if a register is be 
loaded with the contents of a particular memory 
location. This is different from the immediate 
addressing mode which loads the register with a 
constant value. 

LDA SC0AF 

Here the accumulator is loaded with the contents of 
memory location SC0AF. How is this instruction 
represented in memory? The address SC0AF is a 16- 
bit number. A memory location can only hold 8 bits. 
The solution is to divide the 16-bit address into 
two 8-bit numbers. The following convention is used 
for this - immediately following the instruction is 
the least significant part of the address (low- 
byte) and followed by the the most significant part 
{ high-byte ) . 




contents — > 



address > 1200 1201 1202 1203 



20 



The Machine Language Book of the Commodore 64 

In this example, the instruction code is $AD (173). 
The absolute address follows: with the low-byte 
first, SAF (175) and finally the high-byte SCO 
(192). After the instruction is executed, the 
program counter is incremented by three. The 
corresponding instruction in pseudo-BASIC is: 

A = PEEK(SCOAF) 



This instruction also works with the x and Y 
registers. The instruction or operation codes, 
abbreviated to op codes, can be found in Appendix 
A. 

When executing absolute addressing mode instruc- 
tions, the processor gets the low-byte and then the 
high-byte of the address. The data found at that 
address is placed into the accumulator, the program 
counter is incremented by three and the next 
instruction is fetched. These instructions require 
three bytes, in contrast to the immediate 
addressing mode which requires only two. 

Now a quick look at the status register. Load 
instructions affect the zero and negative flags. If 
the value loaded has a value of zero, then the zero 
flag is set; otherwise it is cleared. if the value 
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loaded is negative (greater than S 7 F or 127 
decimal), then the negative flag is set; otherwise 
it is cleared. 



3) Zero-page addressing 

Another addressing mode is called the 2ero-page 
addressing mode. This addressing mode can be used 
if the address of the data is in memory locations 
between and $FF (255). This results in a two-byte 
instruction in contrast to the three-byte instruc- 
tion of the absolute addressing mode. Zero-page 
addressing instructions occupy less memory and 
execute faster. A disadvantage, of course, is that 
the data must be located in addresses from to 
255. 

Where did the term zero-page originate? You can 
think of the 64K of memory as being divided into 
256 pages, each containing 256 bytes. Thus memory 
locations thru 255 form page zero. 

A zero-page load instruction looks like this: 
LDA S7 3 
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contents — > ! A5 



73 ! 



address > 1200 1201 1202 

It is stored as a two-byte instruction: SA5 (165) 
$73 (115), In pseudo-BASIC, this is: 

A = PEEK(S73) 



4) Indexed Addressing 

Another addressing mode is the indexed addressing 
mode. Here the X and Y registers play important 
roles . 

LDA $25B8,X 

This is called absolute addressing indexed by X. 
How does it work? The processor loads the 
accumulator not with the contents of memory 
location S25B8. Rather it first adds the value of 
the X-register to the absolute address (S25B8). If 
the X-register contains S35, for example, the 
following calculation takes place: 

S25B8 + S35 = S25ED 
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The accumulator is loaded with the contents of 

location $25ED. If this instruction is executed 
with varying x-values, a different value is loaded 
each time. This addressing mode is very useful for 
programming loops and when working with tables. 
Other examples are described later. In pseudo- 
BASIC, this addressing mode can be formulated as 
follows: 

A = PEEK(S25B8 + X) 

Here X implies the contents of the X register. 



1 1 

contents — > ! BD ! B8 



i i 
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address > 1200 1201 1202 1203 

You can also use the Y-register in place of the X- 
register for indexed addressing. 



LDA S25B8,Y 

Here the contents of the Y-register is added to the 
absolute address S25B8 to obtain the final address. 
Using both registers, you have two independent 
index variables which can be used for programming 
nested loops. 
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5) Zero—page indexed addressing 

Indexed addressing can also be used together with 
zero-page addressing, thereby carrying over the 

advantages of zero-page addressing to indexed 
addressing. Note that this addressing mode works 
with the X-register only. A typical instruction 
might look like this: 

LDA SBA,X 

This results in a two-byte instruction. 



i i i 

contents — > ! B5 ! BA ! 
i i i 



address > 1200 1201 1202 



6) Indirect Indexed Addressing 

This addressing mode is not as easy to understand, 
but permits very flexible programming -the indirect 
indexed addressing mode. Using this addressing 
mode, zero page plays an important role. With 
indirect indexed addressing, two consecutive memory 
locations in zero-page form a pointer to the actual 
address. The first memory cell contains the low- 
byte and the next contains the high-byte of the 
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actual address. An example clarifies this. 

Imagine that zero-page address $70 contains the 
value S20, and address $71 contains the value $C8. 
These two memory locations form a pointer to the 
address SC8 20. Next the Y-register also comes into 
play in the indexing. If the Y-register contains 
$B3 for example, it is added to SC820 to get an 
effective address of SC8D3 as shown below: 



LDA ($70), Y ($70) => $20 contents of $70 
($71) => SC8 contents of S71 

SCS20 yields this address 
(Y) => $B3 contents of Y reg. 

$C8D3 sum of addr and Y reg. 
(SC8D3) => $4F contents at SC8D3 



After the instruction is executed, the the accumu- 
lator contains $4F. 



I ; i 

contents — > ! Bl I 70 ! 
i i t 



address > 1200 1201 1202 



In pseudo-BASIC it looks like: 



A = PEEK ( PEEK(S70) + 256 * PEEMS71) + Y ) 
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Indirect indexed addressing is indicated by placing 
the operand in parentheses. This addressing mode is 
very efficient, because you can access the entire 
memory with a two-byte instruction. This mode is 
used for managing tables and loops. It is more 
flexible than the simple indexed addressing, 
because the entire memory range can be addressed, 
not just the memory in a single page. Only the 
contents of the two-byte pointer in the zero page 
need be changed. 



7) Indexed Indirect Addressing 

Another addressing mode is the indexed indirect 
address mode, in contrast to the above indirect 
indexed addressing mode. It works with the X- 
register instead of the Y-register. Here also the 
address is formed from two consecutive zero—page 
locations. When calculating the address, the index 
is first added to the pointer and then the contents 
are used as a pointer to the actual address. An 
example : 



LDA (S70,X) (X) => SOS contents of X register 

S70 => $78 added to zero-page addr 

=> (S78) => S40 contents of $78 

($79) => $20 contents of $20 

$2040 yields this address 

($2040) => $A9 contents at $2040 
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The accumulator contains SA9 after the instruction 
is executed. 



contents — > ! Al 



08 ! 



address > 1200 1201 1202 

In pseudo-BASIC it looks like this: 

A = PEEK ( PEEMS70 + X) + 256*PEEK(S70 + X + 1) ) 

First the contents of the X-register is added to 
the operand and the contents of the resulting 
address is used a pointer to the actual address. 
The indexed indirect address mode is seldom used in 
contrast to the indirect indexed mode. You will 
probably have little occasion to use this mode at 
the beginning. 

Here is a summary of the addressing modes and 
operation codes: 



Address mode 



LDA LDX LDY 



immediate $A9 SA2 

absolute SAD SAE 

zero page 

absolute X-indexed 
absolute Y-indexed 
zero-page X-indexed SB5 - 
zero-page Y-indexed - SB6 
indirect indexed $Bl 
indexed indirect SA1 



SA5 SA6 

SBD 

SB9 SBE 



SAO operation codes 

SAC 

SA4 

SBC 

SB4 
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The relative addressing mode and the accumulator 
addressing mode are discussed later. 
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B. The STORE Instructions 

The counterparts of the load instructions are the store 
instructions. Using these instructions we can place the 
contents of a register into memory. The mnemonics for the 
instructions are: 



STA 
STX 
STY 



The contents of the accumulator, X-register or Y-register 
are placed in the appropriate memory location, which is 
specified by the operand that follows the instruction 
code. The same addressing modes used for the load 
instructions apply to these instructions except Eor the 
immediate mode. Storing the contents of a register 
changes neither the register nor the status flags. 

Here are the operation codes and addressing modes: 
Address mode STA STX STY 



absolute S8D S8E S8C operation codes 

zero page S85 $86 $84 

absolute X-indexed S9D 

absolute Y-indexed S99 

zero-page X-indexed $95 - $94 

zero-page Y-indexed - $96 - 

indirect indexed $91 - 

indexed indirect $81 



You should already be acquainted with the BASIC command 
corresponding to the store instructions: the POKE 
command, it writes the contents of a variable to a 
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specified address in memory. In pseudo- BASIC , the 
equivalents might look like this: 



STA $8000 POKE S80A 

STX SC020,Y POKE SC020+Y,X 

STY SF1 POKE $F1,Y 



Store instructions are either two or three bytes in 
length depending on the addressing mode used. The address 
modes are the same as for the load instructions. The 
flags are not affected by store instructions. 

With the load and store instructions, you are now 
acquainted with two important groups of instructions 
which serve to communicate between the microprocessor and 
the memory. 
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C. The Transfer Instructions 

The 6510 microprocessor has instructions to copy the 
contents of one register to another. You can, for 
example, transfer the contents of the X-register into the 
accumulator or vice versa. This is quite important 
because many instructions only work with the accumulator. 
After executing these instructions, the contents of the 
source register are unchanged; the value is merely copied 
into the destination register. The transfer instructions 
within the processor require the participation of the 
accumulator; a direct transfer from the X to Y register 
or vice versa is not possible. 

All transfer instructions are one-byte instructions; they 
need no operand. 

Below are the individual transfer instructions and the 
pseudo-BASIC commands. 



TAX 



The contents of the accumulator is copied into the X 
register. The Z and N flags are affected, but the 
original contents of the accumulator remain unchanged. 

TXA A = X 
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The contents of the X-register is copied into the 

accumulator. The N and Z flags are affected. The contents 
of the X-register are unchanged. 



TAi X = A 

TYA A = Y 



These are the corresponding instructions for the Y- 
register. They work exactly like the above instructions, 
but substituting the Y-register for the X register. 

The next two transfer instructions affect the stack 
pointer. They are seldom used, although the stack pointer 
is discussed later. The stack pointer can be exchanged 
only with the X-register. 

TSX X = SP 

The contents of the stack pointer is placed into the X- 
register. The Z and N flags are set according to the 
value. The contents of the stack pointer remain unaltered 
by this operation. 

TXS SP = X 

The contents of the X-register are placed into the stack 
pointer. No flags are affected by this instruction. The 
contents of the X-register are unaltered. 
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All the transfer instructions are contained in this 
table, along with their instruction codes. 



Command 


Op code 


TAX 


$AA 


TXA 


$8A 


TAY 


SA8 


TYA 


$98 


TSX 


$BA 


TXS 


$9A 
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D. The Arithmetic Instructions 

As with most 8-bit microprocessors, the 6510 can perform 
only two arithmetic operations - addition and 
subtraction. Multiplication and division must be 
implemented by the user. Each calculation requires two 
operands which are combined to produce a result. For the 
6510, the first operand is contained in the accumulator 
and the second operand is obtained from memory. The 
various addressing modes are used for this. The result of 
the arithmetic operation is always left in the 
accumulator. The comparisons with the corresponding 
pseudo-BASIC commands makes this clearer. 

First consider addition. The contents of the addressed 
memory location are added to the accumulator and the 
result is again placed back in the accumulator. 

ADC #S3A A = A + S3A 

If you add two 8-bit values (0 to 255), the result may 
not be able to be represented by an 8-bit number. An 
overflow may occur. Let's take a look at the binary 
addition : 

ADC #S3A; the accumulator contains S9E. 

S9E = % 1001 1110 
S3A - %00111010 
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The addition looks like this: 

10011110 $9E 
+ 00111010 + S3A 



10111000 = SD8 

Binary addition is carried out in the same manner as 
decimal addition. Four different results are possible in 
binary addition: 



+ = 

+ 1 = 1 

1 + 0=1 

1+1=0 plus overflow 



A carry, as in decimal addition, is taken into account in 
the next position. In our example, we get %10111000 or 
SD8 as the answer. The result can be represented in eight 
bits. Here is another example: 

ADC #$3A 

The accumulator now contains SE4. The addition looks like 
this: 



11100100 SE4 

+ 00111010 +$3A 



100011110 = SHE 

Here the result overflows 8 bits; the answer is 
%100011110 or 5 1 IE. But the accumulator holds only an 8- 
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bit number. So the carry flag is used to indicate an 
overflow. After each addition, overflow is indicated by 
the carry flag. If an overflow occurs, the carry flag is 
set (to 1); if no overflow occurs, the carry flag is 
c leared (to ) . 

You can think of the carry flag as the ninth bit of the 
accumulator. If you want to add numbers which cannot be 
represented in 8-bits, multi- precision addition is used. 
A 16-bit number (two 8-bit memory locations) can 
represent numbers between and 65535. 

To add two 16-bit numbers, add the low-bytes of each 
operand and then the high-bytes of each operand, if an 
overflow occurs during the addition of the low-bytes, 
the carry flag adjusts for this during the addition of 
the high-bytes. Remember to clear the carry flag before 
adding the low-bytes so that the previous contents of the 
carry flag do not affect the addition. Here is an example 
of adding two numbers NUMl and NUM2 with the result being 
placed in SUM: 



CLC ;clear carry flag 

LDA NUMl LOW ; low half of NUMl 

ADC NUM2L0W ; low half of NUM2 

STA SUMLOW ;low half of result 

LDA NUM1HIGH ;high half of NUMl 

ADC NUM2HIGH ;high half of NUM2 

STA SUMHIGH ;high half of result 



Now we can give the equivalent instruction in pseudo- 
BASIC. 
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ADC #S3A A = A + S3A + C 

Any overflow is indicated by the carry flag after each 
addition. Besides the carry flag, the zero and negative 
flags are also affected, depending on whether the result 
is zero or the seventh bit is set. An additional flag, 
the V flag, is used for signed arithmetic. The following 
table contains the operation codes for the ADC 
instruction in the various addressing modes. 



Address mode ADC 



immediate S69 operation codes 

absolute S6D 

zero page $65 

absolute x-indexed $7D 

absolute y-indexed S79 

zero-page x-indexed S75 

indirect indexed S71 

indexed indirect S61 



Subtraction is performed in much the same way as 
addition. The contents of the addressed memory location 
is subtracted from the accumulator and the result is left 
in the accumulator. It is possible that the result cannot 
be represented in B-bits. With subtraction, an overflow 
cannot occur, only an underflow. In this case, the result 
is less than zero. The carry flag indicates this too. 
Since overflow and underflow have opposite meanings, 
underflow is indicated by carry flag being cleared. A 
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carry flag being set means that no underflow has 
occurred. Correspondingly, the carry flag must be set 
prior to subtraction {or the first byte of multi- 
precision subtraction). For example: 



SEC ;set carry flag for subtraction 

LDA VALl ;subtrahend 

SBC VAL2 ;minuend 

BCC NEGATIVE ;carry clear means VAL2>VAL1 

BCS NOTNEG ;carry set means VAL2<=VAL1 



In pseudo-BASIC we can formulate this as follows: 



SBC #S3A A = A - S3A - (1-C) 



Binary subtraction is executed in a manner similar to 
addition. There are four possible cases: 



0-0 = 

0-1=1 plus underflow 

1-0=1 

1-1=0 



If the accumulator contains S7F, the binary 
representation looks like this: 



$7F %01111 111 

S3A %00111010 



After setting the carry flag, the subtraction looks like 
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this: 

01111111 
- 00111010 

01000101 

The result is 101000101 or $45. Since no underflow 
occurs, the carry flag is set again. The next example is 
somewhat different. This time the accumulator contains 
S1E and the carry flag is set. 



$1E *00011110 

S3A %00111010 



The subtraction yields the following: 



00011110 
- 00111010 



11100100 

The result is %11100100 or SE4. Because an underflow 
occurred, the carry flag is cleared. How is this result 
interpreted? Consider how we do subtraction using 
decimal numbers. In decimal, our calculation is 30-58. 
The answer is a negative number, -28. In this example, 
the register contains SE4 or 228 (decimal). How are 
these number related? If we subtract the result from 256, 
so we get 28. The cleared carry flag after subtraction 
tells us that the result must be interpreted as a 
negative number. 



40 



The Machine Language Book of the Commodore 64 



Negative numbers are represented using two's complement 
notation. To find the two's complement on a number, 
invert all of the bits of the binary number and then add 
one to this result. 

11100100 original number 
gives 00011011 invert each bit 
+ 00000001 plus 1 

00011100 gives two's complement 
The result is %00011100 or SIC or 28 in decimal. 

Note that the carry flag must be cleared before addition. 
After addition, a set carry flag indicates an overflow. 
The carry flag must be set before subtraction. After 
subtraction, a clear carry flag indicates underflow and 
the result is in two's complement representation. 

This table contains the operation codes for the 
addressing modes. 

Address mode SBC 



immediate $E9 operation code 

absolute SED 

zero page SE5 

absolute x-indexed SFD 

absolute y-indexed S F9 

zero-page x-indexed SF5 

indirect indexed SF1 

indexed indirect $E1 
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E. The logical instructions 

The logical instructions combine two value with each 
other. As with the arithmetic instructions, one operand 
must be in the accumulator while the second is retrieved 
from memory according to the addressing mode. After the 
operation, the result is left in the accumulator. The 
6510 can perform three different types of logical 
operations . 



The AND instruction 

The AND operation compares each bit of the accumulator 
with the corresponding bit in the operand. If the bit of 
the accumulator AND the corresponding bit of the operand 
are both set (to 1), the corresponding bit of the result 
is also set to one. 



AND 0=0 

AND 1=0 

1 AND 0=0 
1 AND 1 = 1 



The bit-wise comparison of the accumulator and operand 
can be made clearer with an example. 

AND #$37 
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Say, that the accumulator contains S5D. ANDing the 
accumulator with $37 gives the following; 



S5D 01011101 
S37 00110111 

£15 00010101 



The result is %00010101 or S15. This corresponds exactly 
to the pseudo-BASIC instruction AND: 

A = A AND $37 

In this case, A = S5D AND $37 or A = 93 AND 55. We get 
the answer 21 or $15. The AMD operation affects the N and 
Z flags. A result of zero sets the Z flag, while results 
greater than $7F (127) set the N flag. 

This table contains the operation codes for each addressing 

Address mode AND 



immediate $29 operation codes 

absolute $2D 

zero page $25 

absolute x-indexed $3D 

absolute y-indexed $39 

zero-page x-indexed $35 

indirect indexed $31 

indexed indirect $21 
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The OR instruction 

The OR instruction compares each bit of the accumulator 
with the corresponding bits of the operand. If a bit of 
the accumulator OR a corresponding bit of the operand 
equals 1, the corresponding bit of the result is set to 
one , 



ORA 0=0 

ORA 1 = 1 

1 ORA 0=1 
1 ORA 1=1 



You can see from the value table that this is the 
"inclusive" OR. The result is one if the first operand 
and/or the second operand is one, not in the sense of 
either/or (but not both). The OR instruction affects the 
N and Z flags. Here's an example: 

ORA #$37 

The accumulator contains S5D. ORing the accumulator with 
$37 works like this: 



$5D 01011101 
$37 00110111 



$7F 01111111 

The result is %01111111 or S7F. This corresponds exactly 
to the BASIC instruction OR: 
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A = A OR S 37 

in our case, A = S5D OR S37 or A = 93 OR 55. We get 127 
or S7F. 

The table below contains the operation codes for each 
address ing mode. 

Address mode ORA 



immediate $09 operation codes 

absolute SOD 

zero page SOS 

absolute x-indexed SID 

absolute y-indexed $19 

zero-page x-indexed $15 

indirect indexed $11 

indexed indirect $01 



The Exclusive OR instruction 

The operand and the accumulator are compared bit by bit. 
The result is set to one if either one or the other bit 
is one, but not both. The truth table looks like this; 



EOR 0=0 

EOR 1 = 1 

1 EOR 0=1 
1 EOR 1=0 



45 



The Machine Language Book of the Commodore 64 

The result of the operation is one if the two bits do not 
equal each other. Here too the N and % flags are affected 
according to the result. There is no corresponding BASIC 
instruction. In BASIC you have to compare all the bits 
individually with a loop. An example looks like this: 

EOR #$37 

The accumulator contains S5D. EORing the accumulator with 
S37 gives the following: 



$5D 01011101 
337 00110111 



S6A 01101010 
The result is %01101010 or S6A (106). 

The table below contains the op codes for the different 
addressing modes: 

Address mode EOR 



immediate $49 operation code 

absolute $4D 

zero page 545 

absolute x-indexed $5D 

absolute y-indexed $59 

zero-page x-indexed $55 

indirect indexed S51 

indexed indirect $41 
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The BIT instruction 

A special feature of the 65XX microprocessors is the BIT 
instruction. This instruction does not change the 
contents of any registers. It affects only the flags. The 
contents of the accumulator are ANDed with the contents 
of the addressed memory location. If the final result is 
zero, the Z flag is set, otherwise it is cleared. 
Additionally, the value of the sixth bit of the addressed 
location is placed into the V flag and the seventh bit is 
put in the N flag. With this one can check these two bits 
of a memory location without disturbing the contents of 
any of the registers. Let us look at an example: 



LDA #310 
BIT S1234 



The accumulator contains $10; address $1234 contains $43. 
The AND operation yields the following result: 



$10 100010000 ;contents of accumulator 

$43 *01000011 ^contents of memory location $1234 

AND %00000000 jlogical result of AND 



The AND operation produces zero, so the 2 is then set. 
The V flag equals the sixth bit of the operand, one, 
while the N flag is cleared. The result is: 

Z=1;V=1;N=0. 
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Two addressing modes can be used with the BIT 
instruction: 

Address mode BIT 



zero page 524 operation codes 

absolute S2C 
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F. The Compare instructions 

These instructions compare the contents of a register 
and the contents of a memory location. These instructions 
alter neither the register nor the memory contents, 
affecting only the flags. You can determine the 
relationship of the two numbers by examining the flags. 

The compare instructions work by logically "subtracting" 
the contents of the addressed memory contents from the 
contents of the register and setting the flags as if an 
actual subtration occurred. The register contents are not 
changed, The C, N, and Z flags are affected depending on 
the result of the "su brae t ion". There are compare 
commands for the three work registers of the 
microprocessor , 



The CMP instruction 

This instruction compares the contents of the accumulator 
with the contents of the addressed memory location, by 
logically subtracting the contents of the operand from 
the accumulator. If an underflow occurs, the carry flag 
is cleared; otherwise it is set. If the result is zero, 
the Z flag is set; otherwise it is cleared. If the result 
is greater than S7F (127), the N flag is set, otherwise 
it is cleared. Let us take a look at an example: 

■19 



The Machine Language Book of the Commodore 64 



LDA #$50 
CMP #330 



The accumulator contains 550. The calculation $50 - $30 
is then carried out, with a result of S20. Because no 
underflow occurred, the carry flag is set. The zero flag 
is cleared because the result is not equal to zero. The N 
flag is cleared because the number is not greater than 
$7F. We get the following result: 



1; Z = 0; N = 



Now another example: 



LDA #$30 
CMP #$30 



Since the accumulator now contains $30, the logical 
subtraction yields zero. The carry flag is set because no 
underflow occurred. Since the result is zero, the zero 
flag is set this time. The N flag is clear because the 
result is not greater than $7F. 

C=1;Z-1;N»0 

Finally a last example: 
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LDA #$10 
CMP #$30 



In this example, the accumulator contains $10 and the 
logical subtraction yields $10 - $30 = $F0. The carry 
flag is cleared to indicate the underflow and the Z flag 
is cleared because the result is not zero. This time the 
N flag is set. 

C=0;Z=0;N=1 

In practice, the flags indicate that the accumulator 
contents are: 



C = 1 : >= greater than or equal to the operand 
Z = 1 : = equal to the operand 
C = : < less than the operand 



To determine if the accumulator is greater than the 
operand (not greater than or equal to), two flags must be 
checked: 

Z = and C = 1 

The compare instructions alter only the flags; they are 
the basis for the conditional branch instructions 
described in the next section. Note that these flag 
interpretations are for comparing unsigned integers only. 
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This table contains the operation codes for each 
addressing mode: 

Address mode CMP 



immediate SC9 operation codes 

absolute SCD 

zero-page SC5 

absolute x-indexed $DD 

absolute y-indexed SD9 

zero-page x-indexed SD5 

indirect indexed SD1 

indexed indirect SCI 



The CPX instruction 

The CPX instruction works the same way as the CMP 
instruction. Here the contents of the addressed memory 
location are compared not with the contents of the 
accumulator, but rather with the contents of the X- 
register. The contents of the registers are not altered. 
What was said above concerning the CMP instruction 
applies to the CPX instruction as well. There are not as 
many addressing modes for the CPX instruction, however. 

Address mode CPX 



immediate SEO operation codes 

absolute SEC 

zero page $E4 
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The CPY instruction 

These instructions are the same as the CPX instructions 
except that the Y-register is used in place of the X- 
register. There are only three addressing modes. 

Address mode CPY 



immediate SCO operation codes 

absolute $CC 

zero page SC4 
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G. Conditional branching instructions 

Next we introduce the instructions that allow you to make 
programming decisions. The foundations of these decisions 
are the conditions of the flags. The following four flags 
can be used to make decisions: the Z flag, the N flag, 
the C flag, and the V flag. 

For each flag there are two conditional branch commands: 
the first branches if the flag is set, the second if the 
flag is clear. The operand of each conditional branch 
instruction specifies the location where the micro- 
processor is to get the next operation code should the 
condition tested for be true. 

The 6510 microprocessor uses the relative addressing mode 
Eor conditional branch instructions. The operand is not 
an absolute memory address, but rather an address 
relative to the current contents of the program counter. 
This relative address is an 8-bit value. The relative 
address is added to the contents of the program counter 
and the branch is made to that computed address if the 
condition tested for is true. 

With this 8-bit value you can represent 256 different 
numbers, so you can branch to any of 25 6 possible 
locations. The relative address causes a branch forward 
if the 8-bit value is positive and causes a branch 
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backward if the 8-bit value is negative. So relative 
addressing can perform backward branching by allowing the 
use of negative operands. 

Let's talk a bit about negative numbers. Using two's 
complement representation all numbers having bit seven 
set are considered to be negative: 



%iooooooo 


S80 


-128 


%10000001 


S81 


-127 


*111 1*1*110 


SFE 


-2 


%11111111 


SFF 


-1 


%0u000000 


soo 





%00000001 


SOI 


1 


%00000010 


$02 


2 


%oiiii'no 


"$7E 


* 1*26 


%01111111 


$7F 


127 



The seventh bit determines if the number is positive or 
negative {also the condition of the N flag). Let's look 
at how we can calculate the distance for a relative 
branch. The calculation is based on the address of the 
instruction following the conditional branch instruction. 
An example: The branch instruction is at address $C47A 
and we want to branch to SC4BF. 



SC47A address of branch instruction 
$C47C address of next instruction 



$C4BF destination address 



Now 



we simply find the difference between destination and 
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the address of the instruction following the conditional 
branch instruction: 

$C4BF - SC47C = S43 

The operand for our branch instruction is S43. How do we 

calculate the relative address for a backward branch? Say 
we want to branch to the address SC440. You can calculate 
the relative address as follows: 

SC440 - SC47C = SFFC4 with underflow 

Simply use the least significant byte - SC4 as the 
operand for the conditional branch instruction. You could 
also calculate the relative address by obtaining the 
positive difference and taking the two's complement of 
the result. 

SC47C - SC440 = S3C 

The two's complement: 



%00111100 original value = $3C 

%11000011 invert all hits = SC3 
+ 1 add 1 

%11000100 = two's complement ~ SC4 



Here also we get an offset of SC4. 

What advantages does relative addressing have? First of 
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all, the branch instructions take up only two bytes in 
memory. Besides the savings in memory there is a faster 
speed of execution. A two byte instruction is executed 
faster by the microprocessor. The most important 
advantage of relative addressing is that the branch 
address is relative to the point of execution. Since the 
branch instructions do not use absolute addresses, if you 
place the same program segment in a different place in 
memory, the program does not have to be changed--the 
location to the branch address does not change. 

If the address to brarch to were given in absolute form, 
it would have to be changed if the program were move to a 
different memory location. The disadvantage of relative 
addressing is the limited address range to which we can 
branch. Only 129 bytes forward or 126 bytes backward from 
the branch instruction is the maximum that can be jumped. 
In practice this is usually no great hindrance, though, 
because it is seldom that a larger distance is involved. 

If you have found the address calculation of relative 
addressing quite complicated, you can rest at ease. We 
have presented this discussion only so that you 
understand the principle. Later, the assembler will tat e 
over this work for you; you need only give it the branch 
destination. The assembler will bring it to your 
attention if you attempt to jump beyond the permitted 
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d istance . 



Branch on zero flag 

A branch when the zero flag is set results from the 
instruction "branch on equal," shortened to BEQ. If the 
branch is to be made on a cleared zero flag, the 
instruction is called "branch not equal," BNE. 



Branch on carry flag 

Here the instruction is called "branch on carry set" or 
BCS for branching on a set carry flag and "branch on 
carry clear", BCC, for a branch on carry clear flag. 



Branch on negative flag 

If the negative flag is set, the instruction "branch on 
minus," BMI, will branch; in order to jump on a clear 
negative flag, the instruction "branch on plus," BPL, 
must be used. 
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Branch on overflow flag 

The overflow can also be used as the basis for 
conditional branches. The corresponding commands are 
"branch on overflow set," BVS, and "branch on overflow 
clear," BVC. Because of the secondary importance of the V 
flag, these commands are seldom used. 

This table contains all commands for conditional 
branching, together with their op codes. 



Command 


Op code 


BEO 


SFO 


BNE 


SDO 


BCS 


$B0 


BCC 


$90 


BHI 


$30 


BPL 


$10 


BVS 


$70 


BVC 


$50 
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H. The Jump instructions 

In contrast to the conditional branch commands above, the 
unconditional jump instructions branches to an absolute 
address. These instructions are not dependent on any 
condition and is always executed. The destination address 
is specified in reverse sequence (low-byte followed by 
high-byte) as are the other absolute addresses. 

JMP SC420 direct jump to location SC420 

In addition to the absolute form of the jump instruction, 
there is also an indirect addressing form, a peculiarity 
of the jump instructions. With this instruction, the 
specified address is not jumped to. Instead, this address 
tells where to get the actual destination address. For 
this, two consecutive bytes are again used as a pointer, 
in the format low byte, high byte. 



JMP (S0302) indirect jump to destination pointed 

to by address S0302 



The actual address is now taken from memory locations 
S0302 and S0303. if, for example, S40 and SC8 are in 
these locations, a branch to location SC840 will be made. 
This method of addressing works only with the JMP 
instruction. The table contains the operation codes for 



60 



The Machine Language Book of the Commodore 64 



both addressing modes. 



Address mode JMP 

absolute S4C operation codes 
indirect S6C 



The operating system of the Commodore 64 makes use of 
this method of addressing. There are several addresses 
(called vectors) located from S300 to S33C, that contain 
addresses for indirect JMPs. The operating system uses 
these vectors for performing frequently used routines. 
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I. The Increment and Decrement instructions 

For effective programming of loops and counters, the 6510 
has commands to increment or decrement the contents of a 
register or memory location by one. These increment 
instructions correspond, together with the conditional 
branching commands, to the NEXT instruction in BASIC. The 
STEP-1 instruction can be simulated with the decrement 
commands. 



I NX 



The contents of the X register are incremented by one. 
The N and Z flags are set according to the result. In 
BASIC, this instruction can be formulated: 

X = X + 1 

If a value of Sff is incremented, the overflow is not 
taken into account (the carry flag is not set). The 
contents are set to zero, and the Z flag is set. 



I NY 



This is the corresponding instruction to increment the y 
register. It affects the flags in the same way. 
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There is no instruction on the 6510 to increment or 
decrement the accumulator contents. 



INC 



This instruction increments the contents of a memory 
location by one. The Z and N flags are again set 
depending on the result. This instruction is different 
from the previous ones in that here the contents of a 
memory location is first read, then incremented by one, 
and then saved again (read - modify - write). The 
commands which you are acquainted with so far either read 
or wrote a memory location, but never both. The II'C 
instruction does not alter the contents of the 
accumulator. 

In pseudo-BASIC, we can formulate this like so: 

POKE H, PEEK(M) + 1 



H is the address of the memory location. 
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DEX 



This instruction decrements the contents of the X 
register. When decrement from $00 to $FF, the carry flag 
is not set. The N and Z flags are set depending on the 
result. In psdueo-BASIC this can be written as 



DEY 



This instruction is the analog of the previous 
instruction, decrementing the contents of Y instead of X. 
The flags are affected in the same manner. 



DEC 



With this instruction the contents of a memory cell can 
be decremented without losing the contents of the 
accumulator. Its operation is equivalent to that of the 
INC instruction. 

Here again is the table of instructions and their 
opcodes: 
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Command Op code 

INX SE8 

INY $C8 

DEX SCA 

DEY $88 



Address mode INC DEC 

absolute $EE $CE operation codes 

zero page $E6 SC6 

absolute x-indexed SFE SDE 

zero-page x-indexed SF6 SD6 
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J. Flag manipulation instructions 

In addition to the instructions whose results affect the 
flags, the flags can also be directly set or cleared by 
the programmer. Sometimes this is necessary before 
performing addition and subtraction. These instructions 
do not require any operands. They are all one-byte in 
length. 



The carry flag 

The carry flag is set by the instruction SEC (set carry), 
and cleared by CLC (clear carry). 

The SEC instruction must be used before each subtraction 
and the CLC instruction before each addition, otherwise 
the answer may be wrong. 



The decimal flag 

This flag determines whether the processor performs 
addition and subtraction in binary (indicated by a 
cleared flag, as we have already learned) or in binary- 
coded decimal (RCD). This is the case if the flag is set. 
The microprocessor then works with BCD numbers. The 
instruction SED (set decimal) sets the flag, CLD (clear 
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decimal) clears the flag. 



The interrupt flag 

The I flag determines whether the processor is ready to 
accept an interrupt or not. If the I flag is set with SEI 
(set interrupt disable), no interrupts will be accepted, 
while if it is cleared with CLI (clear interrupt 
disable), the processor can accept interrupts. 



The overflow flag 

The v flag can only be cleared on instruction. The 
instruction CLV (clear overflow) serves this purpose. 

This table contains the operation codes for these one- 
byte commands. 



Command 


Op code 


CLC 


S18 


SEC 


S38 


CLD 


SD8 


SED 


$F8 


CLI 


S58 


SEI 


S7B 


CLV 


SBS 
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K. The Shift Instructions 

The 6510 microprocessor has some instructions for which 
there are no equivalents in BASIC: the shift 
instructions. These instructions shift the bits in the 
accumulator or addressed memory location one position to 
the right or left. If these instructions are used in 
reference to the accumulator, one speaks of accumulator 
addressing. Depending on the addressing mode, these 
commands can consist of one, two, or three bytes. If a 
memory location is addressed, they behave as an INC or 
DEC instruction by following a read with a write. The 
contents of the accumulator remain unchanged by this 
addressing mode. 



ASL 



ASL stands for "arithmetic shift left." It shifts the of 
the addressed byte by one bit-position to the left. A 
zero is placed in the right-most bit (bit 0) and the 
carry flag is set equal to the left-most bit (bit 7). Let 
us look at an example using the accumulator. 

ASL A The accumulator contains $47 

S47 %01000111 

%100(H110 S8E, C = 
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in this case, the result is S8E and the carry flag is 

cleared because the accumulator contains a zero in the 
seventh position. If we compare the contents of the 
accumulator before and after the shift, we notice that 
the accumulator has doubled. When we shift a normal 
decimal number one position left, we get the value times 
ten. With the binary system, shifting left to the next 
position results in only doubling the value. With the ASL 
instruction we have a simple method of doubling a number. 
Let us try another example: 

ASL A The accumulator contains SCD 

SCD %11001101 

%10011010 $9A, C = 1 



Here too we double the original value and the carry flag 
is set. The double of SCD (205) is therefore S19A (410). 



LSR 



The LSR instruction (logical shift right) corresponds to 
the ASL instruction; here, however, the value is shifted 
right. The seventh bit is loaded with zero and bit zero 
is placed in the carry flag. 

LSR A The accumulator contains SCA. 
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SCA 411001010 

%01100101 $65, C = 

The result is $65. The carry flag contains the value of 
bit position before the shift occurs, in this case 0. 
So the carry flag is clear. You may have noticed that, 
shifting one bit position to the right divides the 
original value by two. The carry flag gives the contents 
of bit before the shift. We can interpret the value of 
the carry as the remainder of the division by two. This 
way we can tell if a number is odd or even. The LSR 
instruction shifts the lowest bit into the carry. The 
carry flag can then be tested with BCC or BCS. If a 
memory location is addressed with the LSR instruction, 
the contents of the accumulator are retained. 



ROL, 



With the ROL instruction (rotate left) we can shift a 

memory location or register left cyclically, that is, 

rotate the bits. The carry flag is shifted into bit 

while the contents of bit 7 are placed in the carry. 

Therefore we have a cyclical shift of nine bits (8 bits 

of the register plus the carry flag). An example will 

clarify this. 

ROL A The accumulator contains $4B, 
the carry flag is set. 

S4B %01001011 C=l 

$97 U0010111 C=0 
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All bits are shifted one position to the left. The carry 
flag is transferred into the now-vacant bit 0. The 
pushed-out seventh bit is placed into the carry. We get a 
result of $97 and a cleared carry. Here again the 
contents of the accumulator are doubled; any overflow is 
placed into the carry. 



ROR 



The ROR instruction {rotate right) is the opposite of the 
ROL instruction and rotates the contents of a register 
cyclically one position to the right. In so doing, the 
contents of the carry flag are placed into the now-free 
position 7 while the pushed-out contents of bit are 
placed into the carry flag. 



ROR A The accumulator contains $89, 
the carry flag is clear. 

$89 U0001001 C=0 

$44 %01000100 C=l 



From S89 we get $44, the carry is set and indicates a 
remainder from the division by two. All shift and rotate 
commands set the N and z flags depending on if the result 
greater than $7F or equal to 0. 

This table contains the operation codes for all 
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addressing modes: 



Address mode ASL LSR ROL ROR 



accumulator 


SOA 


$4A 


S2A 


S6A 


operation code 


absolute 


SOE 


S4E 


S2E 


$6E 




zero page 


S06 


S46 


$26 


S66 




absolute x-indexed 


S1E 


S5E 


S3E 


$7E 




zero page y-indexed 


S16 


S56 


S36 


576 
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L. The Subroutine Instructions 

A very important programming technique, which you already 
know from BASIC, is the use of subroutines. In BASIC, the 
instruction GOSUB is used to call a subroutine, and the 
instruction RETURN is used to return from the subroutine. 
How is a subroutine call distinguished from a normal jump 
instruction such as GOTO or JMP? When we call a 
subroutine, the processor or BASIC interpreter must make 
note of the location from which the subroutine was called 
so that the RETURN instruction can branch back to the 
location following the call. The BASIC interpreter does 
this for us; the 6510 also handles this task for us in 
machine language, in spite of this, however, we should 
know how it works. 

So that the processor knows which instruction to branch 
back to on a RETURN instruction, the current address of 
the program counter is saved when the call is made. A 
special storage area is reserved for this, called the 
stack. This stack lies from address S0100 to S01FF (256 
to 511). There is something called a stack pointer so 
that the microprocessor knows at which address of the 
stack it can save a return address. We have already been 
introduced to the stack register. Let's take a look at 
what happens when a subroutine is called. 

The processor takes the current contents of the program 
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counter (+2) and divides it into high and low bytes. The 
high byte is stored at address S100 plus SP. Then the 
contents of the stack pointer are decremented by one and 
the low byte is stored on the stack (address 100 + SP). 
Finally the stack pointer is decremented by one again. 
Now a branch is made to the subroutine. 

When the processor encounters an RTS instruction, the 
opposite process takes place. The stack pointer is 
incremented by one and one byte is taken from the stack 
(address S100 + SP). This byte is used as the low-byte of 
the program counter. Then the stack pointer is 
incremented again and the high-byte of the program 
counter is fetched from the stack. Mow the program 
counter points to the next instruction after the 
subroutine call and the program is continued there. 

When values are placed on the stack, the value is first 
saved on the stack and then the stack pointer is 
decremented by one. when getting a byte back from the 
stack, the stack pointer is first incremented by one. The 
stack grows from top to bottom (from S1FF to $100). An 
example will explain these events. 



SC4B0 JSR S2OO0 SP = SFA 

S01FA = SC4 SP=SP-1 
S01F9 = $82 SP=SP-1 
SP = SF8 
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Now execution branches to S2000, where for our example, 
there is a RETURN instruction. 



S2000 RTS 



SP = SFB 






SP=SP+1 PCL = 


-- (S01F9) 


■ S82 


SP=SP+1 PCH = 


(S01FA) = 


= SC4 


SP = SFA 







The program counter now contains SC482. This value is 
then incremented by one and so points to SC483, the next 
instruction after the subroutine call at address SC480, 

The stack works on the principle "Last In — First Out" 
(LIFO). The value last placed on the stack is the first 
value to be returned. Using this principle, it is also 
possible to nest subroutines. If a subroutine is called 
from another subroutine, the first RTS instruction 
encountered returns the instruction following the most 
recent JSR instruction. The next RTS instruction then 
returns control to the instruction following the next 
most recent JSR instruction. For example: 



this JSR 



this JSR 



MAINPGM 



JSR SUBl 



RTS 



calls this subroutine 
SUB2 




returns to this 
instruction 



returns to this 
instruct ion 
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Once you become familiar with the operation of the stack, 
you can also use it for temporary storage of data. This 
is described in the next section. 

The table contains the operation codes for subroutine 

call and return. 

Command Op code 

JSR 520 

RTS $60 
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M. The Stack Instructions 

The 6510 has the ability to save the contents of the 
accumulator and the status register on the stack and to 
get them back again. The stack pointer is automatically 
decremented after writing and incremented before reading. 



PHA 



The instruction PHA (push accumulator) saves the contents 
of the accumulator on the stack and decrements the stack 
pointer by one. The contents of the accumulator are 
unchanged . 



PHP 



With the PHP instruction (push processor status), the 
entire status register (contents of the flags) is placed 
on the stack and the stack pointer is decremented by one. 
The contents of the status register are retained. 



PLA 



The PLA instruction (pull accumulator) is the opposite of 
PHA. The stack pointer is incremented and a byte read 
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from the stack into the accumulator. The N and 2 flags 
are set according to the value. 



PLP 



With this instruction, one byte is fetched from the stack 
and placed in the status register. This is the complement 
of PHP. 

The table contains the operation codes. 

Command Op code 

PHA $48 

PHP $08 

PLA $68 

PLP $28 
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N. Instructions for handling interrupts 

We are not going to use use these instructions but 
mention them only for the sake of completeness. The 6510 
has the ability to interrupt a program from the outside 
world. For this, the interrupt line (IRO. interrupt 
request) of the processor must be activated. The 
interrupt procedure is similar to a subroutine call. The 
processor interrupts the current program and places the 
contents of the program counter and the status register 
on the stack. Now execution branches to the address 
contained at SFFFE and SFFFF. The contents of these 
addresses are used as the new program counter. 

In addition to an interruption from the outside, the 6510 
can also interrupt a program through a instruction from 
within the program. The instruction BRK (break) serves 
this purpose. The program counter and the status register 
are saved on the stack. 

In order to return to the main program from an interrupt 
routine, there is a instruction similar to the RTS 
instruction for subroutines. The instruction RTI (return 
from interrupt) gets the program counter and the contents 
of the status register back from the stack so that the 
program can continue without changing the flags. 

The following table contains the operation codes for 
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these commands: 



Command Op code 

BRK S00 

RTI $40 



There is one instruction which has not been mentioned yet 
which does absolutely nothing and so is called NOP (no 
operation). This instruction is used to remove operation 
codes from a program without shifting the rest of the 
commands, as well as in delay loops (this instruction too 
requires a certain amount of time to execute). 

Command Op code 

SOP SEA 
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4. Entering Machine Language Programs 

Now that we have become acquainted with the instructions of 
the microprocessor and their functions, let's turn our 
thoughts to writing programs in machine language. How do we 
enter such programs? 

As we have already seen from the descriptions of the 
instructions, a machine language program program consists 
simply of a set of instruction codes and their corresponding 
operands, if any. As a simple example, we will display a 
character on the screen of the Commodore 64. We can do this 
with these simple POKE commands in BASIC: 



POKE 1024,1 : REM DISPLAY CODE FOR A 

POKE 55296,7 : REM COLOR CODE FOR YELLOW 



When we execute both commands, a yellow "A" appears in the 
upper left-hand corner of the display. Now we want to see 
how these two commands can be performed in machine language. 
For this, we recall that the POKE command can be replaced by 
the instruction STA. This instruction places the contents of 
the accumulator at the address specified by the operand. 
First load the accumulator with the desired value. 



LDA #1 

STA 10 24 



Here the accumulator is loaded with the value 1 and the 
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contents are saved at address 1024. In the same way, we can 
set the value for the color code. 



LDA #7 
STA 55296 



If we were to try entering these instructions directly into 
the computer, we would get a 7SYNTAX ERROR. The Commodore 64 
normally understands only BASIC commands. These 
instructions are "foreign" to the BASIC interpreter. 
Therefore we must proceed in a different manner. Recall that 
a machine language program is nothing more that a group of 
binary instruction codes and operands in memory. 

We must convert the mnemonic instructions into their 
corresponding binary instruction (or operation) codes. To do 
this, we use the table in Appendix A. For a LDA instruction 
using the immediate addressing modefwe want to load the 
accumulator with the number 1, not with the contents of 
memory location 1) we find that the opcode is $A9, Next 
follows the operand itself, 1. We are using absolute 
addressing for the STA instruction. The instruction is 
therefore S8D. The operand in this case is a memory address, 
saved as a 16-bit value. For this it must be divided into 
two 8-bit values. First comes the low-byte and then the 
high-byte. Separating a 16-bit value is easier to perform if 
we first convert the number to hexadecimal. Therefore we 
convert 1024 to the hexadecimal number S0400. 55296 becomes 
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SD800, Let's rewrite our program using hexadecimal numbers. 



LDA #S01 
STA S0400 
LDA #S07 
STA SD800 



The low-byte of S0400 is S00 and the high-byte is S04. The 
instruction STA S0400 is represented as S8D, S00, S04. LDA 
#S07 STA SD800 are represented as SA9, S07, S8D, S00, SD8. 
Our complete program looks like this; 

$A9, $01, $8D, 500, $04, SA9, S07, $8D, S00, SD8 

This set o£ bytes must now placed in memory. Here we 
encounter the next problem: Where should our program be 
placed in memory? We must find an area which is not used by 
the operating system or the BASIC interpreter. For the 
Commodore 6 4 we have such an area from address 49152 to 
53247 or SC000 to SCFFF. This area is 4K bytes large and 
will suffice even for very large machine language programs. 
Let's place our program in memory beginning at address 
49152. We can rio this with a small BASIC program. First 
change the hexadecimal numbers to decimal, 

169, 0, 141, 0, 4, 169, 7, 141, 0, 216 

lOfl FOP 1 = TO 9 

110 RF.AD A : POKE 49] 52+ 1, A 

120 Nt.XT 

130 DATA 169,0,141,0,4,169,7,141,0,216 
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when we RUN this program, the machine language program is 
usually placed into memory beginning at address 49152. Now 
we can finally execute our program. The SYS instruction is 
used for this in BASIC. If we give the starting address of 
49152 after the SYS instruction, the program is executed 
from BASIC. Be careful! What happens once the processor has 
executed the instruction STA SD800? It gets the contents of 
the next memory location and interprets it as a instruction 
code. If it is not a legal instruction, the processor may 
enter an uncontrollable state and "crash." You must then 
turn the computer off and then on again. The program is lost 
and you must start over from the beginning. 

Once the processor has executed the four instructions, 
control should be returned to the BASIC interpreter. The SYS 
instruction executes our program as a subroutine. We should 
end the program with an RTS instruction. 

POKE 49152+10,96 

We can place the RTS code at the end of our program. Now we 
can start our program with: 

SYS 49152 

Immediately a yellow A appears in the upper corner of the 
display and the computer responds with READY.. 



84 



The Machine Language Book of the Commodore 64 

Is this procedure too complicated for you? If so, then you 
are not alone. Ways have been found to automate this 
process. After all, this is why you have has a computer! 

You need a program that accepts machine language 
instructions such as "LDA #1" and automatically converts the 
mnemonics to their proper operation code and writes the 
generated code into memory. Such a program is called an 
assembler. So that you can start working with an assembler 
from the beginning and not lose your desire by working 
through boring calculations and table consultations, we have 
written a complete assembler for you. Before we explain the 
operation of the assembler, we will take a look at other 
utility programs that can be used for machine language 
programming . 

The first is the monitor program. A monitor permits the 
direct access of the memory and registers of the 
microprocessor. With the monitor you can examine and alter 
the contents of memory and registers. In addition, you can 
start executing a machine language program from a monitor. 
Most monitor programs also permit saving and loading of 
programs to/from cassette or disk. If you have a monitor, 
then you can enter your machine language programs in hex 
code. This is fine for small programs or changes. Often the 
monitor contains something called a disassembler as well. 
Such a program is the opposite of an assembler. The 
disassembler reads a program from memory and outputs it in 



85 



The Machine Language Book of the Commodore 64 



mnemonic form; SA9, SOI are translated to LDA (t$01, for 
example. We have also written a disassembler. It is 
presented later. Using this program you can disassemble not 
only your own programs, but parts of the operating system 
and BASIC interpreter as well. You can often get valuable 
hints by looking at other example of good programming. 
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4. The Assembler 

Here's a small machine language program that demonstrates 
the advantages of an assembler over manual entry of a 
machine language program. 

This program displays the entire character set of the 
Commodore 64 on the screen, we'll do this first with a BASIC 
program. 

The Commodore 64 can display 256 different characters on the 
screen; the display codes range from to 255. Each display 
code places a unique character on the screen, using BASIC 
you can do this with a loop. 



100 X = 

110 A = X 

120 POKE 1024+X, A : REM DISPLAY CODE 

130 A = 1 

140 POKE 55296+X, A : REM COLOR CODE 

150 X = X + 1 

160 IF X <> 256 THEN 110 

170 END 



If you RUN this program, the entire character set of the 
Commodore 64 is displayed. Note that the time to RUN this 
program is about 7 seconds. 

This BASIC program is written so that you can easily convert 
it to machine language. Now for the conversion! We'll handle 
it line by line. First we can use the X-register in place of 
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the variable X: 

100 X = => LDX #$0 

We can use the accumulator in place of the variable A. The 
next line copies the contents of the X-register into the 
accumulator: 

110 A = X => TAX 

The contents of the X-register remains unchanged. Now 
the contents of the accumulator are place into memory at 
location 1024+X. Indexed addressing is used: 

120 POKE 1024+X, A => STA 1024, X 



Next the accumulator is loaded with the color code for 
white, 1. 



130 A = 1 => LDA #1 

This color code is then stored in the corvesponding color 

memory location, 55296+X. Again indexed addressing is used: 

140 POKE 55296+X, A => STA 55296, X 

The value in the X-register is now incremented by one: 

150 X = X + 1 => I NX 
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The next conversion is not as straight-forward: 

160 IF X <> 256 THEN 110 => ? 

This BASIC statement requires some consideration. We want to 
branch back to line 110 if the contents of x is not equal to 
256. But the X-register can hold values only up to 255. What 
happens when the X-register contains 255 and an INX 
instruction (in line 150} is executed? Incrementing from 255 
(SFF) we get S100. The overflow is simply ignored and the 
result is $00 — zero. 

How can we recognize this case? Recall the discussion 
concerning the flags. Each time the X-register is 
incremented, the N and Z flags are also affected. After the 
INX instruction, if the value in the X-register is greater 
than S7F (127), the N flag is set, otherwise it is cleared. 
Similarly if the value in the X-register is zero after the 
INX instruction, the Z flag is set, otherwise it is cleared. 
So can use the contents of the zero flag as the basis of our 
decision. If it is not set, the contents are not equal to 
256 (0) and we must branch back to line 110. 

160 IF X <> 256 THEN 110 => BNE line 110 

Here's another problem. In machine language programming we 
cannot say "branch to line 110". Instead we must specify the 
memory address at which the instruction in line 110 is 
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located. 

Wo do not know what the address is yet. We must determine 
the program starting address and the length of each 
instruction. If we begin the program at address 49152 or 
SC000, then these are the addresses of each instruction: 

LINE* ADDRESS MNEMONIC 



100 


scooo 


LDX 


1=0 


no 


SC002 


TXA 




120 


SC003 


STA 


S0400,X 


130 


SC006 


LDA 


#1 


140 


SC008 


STA 


SD800,X 


150 


$C00B 


I NX 




160 


scooc 


BNE 


SC002 


170 


SC00E 


RTS 





How did we do this? First set a "program counter" to the 
starting address of the program. In this case it starts at 
SCOOO. Now find the length of each instruction by looking 
in Appendix D. The length is either one, two or three bytes. 
Update the "program counter" by adding the length of the 
instruction. The "program counter" now contains the address 
of the next instruction. Repeat this for each instruction. 

After hand assembling the program, we find that the 
instruction at line 160 must branch to address SC002. Now 
take the trouble to convert the program to generate the 
machine code. Here's the code: 
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100 


scooo 


a:> 


00 




LDX 


so 




110 


SC002 


a a 






TXA 






1 20 


$C003 


9D 


00 


04 


STA 


S0400 


,x 


130 


SC006 


A9 


01 




LDA 


= 1 




i .lit 


$C00B 


5D 


00 


D8 


STA 


SD800 


,x 


150 


SC0QB 


E8 






I NX 






160 


$C00C 


DO 


?? 




BNE 


$C002 




170 


SC0OE 


60 






RTS 







We can substitute the operation code for the mnemonic 
according to APPENDIX A. We must convert the 16-bit absolute 
addresses found in line 120 and 140 to their reverse forms 
(00 04 and 00 D8). Next we must calculate the missing of fst t 
for the branch instruction in line 160. To do this, first 
form the positive difference between the addresses and form 
the two's complement of the result. 



$C00E 
5C002 



S000C 

S0C = 100001100 original value 

%111 10011 invert all bits 

+ 1 add 1 



SF4 %11110100 two's complement 

We find that the offset is SF4. Enter this value as the 
operand of the BNE instruction above. 

We have completed the hand assembly of this program. To test 
the program, the machine language program has to be in 
memory. You have to write the operation codes into memory 
somehow such as POKing them. 
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Here's an example: 



100 REM SAMPLE ML PROGRAM TO DISPLAY CHARACTERS ON SCREEN 

150 ML = 49152 

200 FOR I = TO 14 

210 READ OC 

220 POKE ML+I ,OC 

230 NEXT I 

240 END 

300 DATA 160, 0, 138, 157, 0, 4, 169, 1 

310 DATA 157, 0, 216, 232, 208, 244, 96 



Run the BASIC program to put the machine language routine in 
memory beginning at 49152. Now to test it, move the cursor 
to the lower half of the screen and enter: 

SYS 49152 

Almost immediately, the entire character set appears on the 
screen. The program which took more than seven seconds to 
run in BASIC now runs in a fraction of a second. It is sn 
impressive demonstration of the speed which can be attained 
with machine language. 

Now let's use the LEA (Lothar Englisch Assembler - named 
after the author) to enter machine language programs. An 
assembler makes machine language programming quicker, 
easier and less prone to error. Using the LEA, you can enter 
machine language programs into the computer in exactly the 
same way as you enter BASIC programs. You can add, delete or 
insert or change lines just as in BASIC. The listing for 
the LEA is at the end of this chapter. 
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A program line is called a source statement. When using the 
LEA, the source statement always begins with a line number. 
It also has: an optional label (more about this shortly); 
the mnemonic code for the machine language instruction (LDA, 
STA, etc.); any required or optional operand(s); and 
optional comments. By using comments within your assembler 
source program, you can describe the purpose of each 
instruction. Comments are denoted with a semicolon and are 
ignored by the assembler, but appear in the listing for your 
own information. They correspond to the BASIC command REM. 

A complete line of assembler source for the LEA might look 
like this: 

100 TEXT LDA S70,X ;GKT START VALUE 

A complete LEA source program can also be SAVEd to disk, 
just like BASIC. The LEA requires you to distinguish this 
source program from the machine language program that it 
later creates by suffixing .SRC to the name. After you 
create your assembler source file, you then load the LEA 
ssenbler. Once started with RUN, LEA asks for the name of 
the program to be assembled (the one you just SAVEd). The 
LEA reads this program from the disk and creates the machine 
code program from it, which it places directly in memory. 

In addition, the LEA produces an optional assembly listing 
containing the line numbers, source statement instructions 
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including comments and generated machine codes in 
hexadecimal format. When assembling, the LEA automatically 
calculates the addresses and offsets for branches. You as 
the programmer, need give the branch destination not as an 
absolute address, but symbolically in the form of a labtl 
(also called symbol). Our example program from before looks 
like this: 



100 




LDX #0 


110 


LOOP 


TXA 


120 




STA $0400, X 


130 




LDA #1 


140 




STA SD800.X 


150 




I NX 


160 




BNE LOOP 


170 




RTS 



Here we simply give a label to the address that we want to 
refer to later. In this case we used the symbol LOOP. As the 
assembler processes the source program, it encounters a 
label. It makes note of the label, LOOP, and the value the 
program counter at which the label (or symbol) is found. In 
our example, the program counter has the value SC002 at line 
110. The assembler assigns this value to the symbol LOOP. 
Later, the offset for the branch instruction can be 
calculated from the immediate value of the program counter 
and the value of the symbol. As the assembler works its way 
through the source program, it automatically places the 
operation code for the mnemonic instructions and their 
operands in memory so that the machine language program is 
ready to be executed at the end of the assembly. 
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Using this technique, it is possible that you might refer to 
a label before it is defined: 



100 


LDA 


$40 


110 


BEO 


CONT 


120 


LDX 


#$FF 



130 CONT STX SDS40 
140 BTS 



In this program line 110 refers to a label (CONT) which at 
that point is not yet defined. The assembler has no way of 
knowing the value of the symbol CONT. So the assembler is 
designed to go though the source program twice. The first 
time through, the LEA makes note of all the symbols and 
their values. The second time through, it does the actual 
assembling or code generation. So during the second time 
through, when the LEA comes to line 110, it already knows 
the value of CONT from the first time through and can 
calculate the offset for the branch instruction. 

Since the LEA assembler reads the source program twice, it 
is said to be a 2-pass assembler. So that you can see the 
progress of the assembler, the LEA displays the number of 
the line it is currently working on. 

When you enter a source program by using the built-in BASIC 
line editor, the BASIC interpreter searches through the 
source statements for BASIC command keywords. When it finds 
them, it converts these into one-byte codes called tokens. 
As a result, the LEA assembler cannot normally recognize 
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words that contain BASIC keywords such as ON, to, and even = 
and * because they have been converted to tokens. For this 
reason, you must first enter and RUN the following BASIC 
program, called UNTOKEN before using the BASIC line editor 
to create the assembler source file. UNTOKEN inhibits BASIC 
from tokenizing normal BASIC keywords. Thus BASIC keywords 
are not be converted to their corresponding tokens. This 
enables the LEA to recognize their untokenized equivalents 
in normal text. 

When you are finished using the LEA, and you want to enter 
normal BASIC programs again, enter the instruction: 

SYS 53181 

This re-enables BASIC to tokenize its keywords. 



REM PROGRAM UNTOKEN 

100 FOR I = 53100 TO 53191 

110 READ X : POKE I ,X : S=S+X : NEXT 

120 DATA 169,119,160,207,141, 2, 3,140, 3, 3, 96, 32 

130 DATA 96,165,134,122,132,123, 32,115, 0,170,240,243 

140 DATA 162,255,134, 58,144, 6, 32,121,165, 76,225,167 

150 DATA 32,107,169,160, 0,162, 0,189, 0, 2,232,201 

160 DATA 32,240,248,201, 48,144, 4,201, 58,144,240,153 

170 DATA 0, 2,201, 0,240, 7,189, 0, 2,200,232,208 

180 DATA 242,200,200,200,200,200, 7 6,162,164,169,131,160 

190 DATA 164,141, 2, 3,140, 3, 3, 96 

200 IF S <> 11096 THEN PRINT "ERROR IN DATA \ ! " : END 

210 SYS 53100 : PRINT "OK" 



After you key in this program, you should save a copy on 
each diskette on which you will later store assembler source 
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programs. Remember to load and RUN UNTOKEN before creating 
assembler source programs. 

Now enter the earlier sample program, insert line 180 which 
contains .EN. This is a pseudo-instruction which tells the 
assembler that this statement is at the end of your source 
program. Save the source program on disk with the name 
TEST. SRC. 

Did you remember to first LOAD and RUN the above UNTOKEN 
program? Now you can load the LEA assembler and RUN it, The 
following appears on the screen. Respond as requested. 

6510 - ASSEMBLER 

SOURCE FILE NAME ? TEST 
LISTING Y/N ? Y 

PRINTER Y/N ? N 

After a short time the message PASS 1 appears on the screen 
and the disk drive shows some activity. Now the line numbers 
from 100 to 180 appear on the screen. During the second 
pass, the listing is displayed: 



PASS 2 














cooo 


ft 2 


00 




100 


LDX 


#0 


C002 


8A 






110 LOOP 


TXA 




C003 


9D 


00 


1 


120 


STA 


$0400, X 


C006 


A9 


1)1 




130 


LDA 


11 


COOS 


9D 


00 


D8 


140 


STA 


SD800,X 


C00B 


E8 






150 


INX 




cooc 


DO 


i'4 




160 


BNE 


LOOP 


C00E 


60 






170 
180 


RTS 
.EN 





LABEL C002 
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When the listing is completed, the LEA assembler asks you if 
the generated machine language program should be saved to 
diskette. Answer with Y(es). 

SAVE Y/N ? Y 

The program is saved to diskette under the name TEST.OBJ on 
the diskette (OBJ = OBJect program). Statistics about the 
generated code and errors are also displayed: 



COOO / COOF / OOOF 
SOURCE FILE IS TEST. SRC 
ERRORS 



The assembler offers the option of displaying all the 
symbols and their values. 



SYMBOL TABLE Y/N ? Y 
SORT Y/N ? N 

LOOP COO 2 



You can also specify that the table is to be sorted 
alpha be tically. 

The generated machine language program is now contained on 

the diskette with the name TEST.OBJ. There is also a copy of 

it in memory, ready to be executed. Now test it out by 
entering: 

SYS 49152 
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The entire character set appears on the screen almost 
immediately . 

There are a few things about the assembler you should know. 
Each line of the source program consists of a line number, 
an optional symbol (also called label), and a mnemonic 
instruction such as LDA, followed by the operands (if 
necessary) and comments separated by a semicolon. The 
comments may be omitted of course, but we advise you to make 
liberal use of these and describe exactly the operations you 
intend. Should you lay your program aside and need to use or 
change it at a later time, you will be thankful that you 
commented it. 

The symbols may be maximum of five characters in length. In 
addition to the implicit symbol definitions (labels), you 
can assign values to symbols directly. This makes programs 
easier to understand and easier to read. 

In this example, we use symbols for the addresses of the 
color and screen memory: 



PASS 2 


















400 








70 


VIDEO 


= 


S400 




D800 








80 


COLOR 


= 


SD800 




COOO 








90 




* - 


SCOOO 




COOO 


A2 


00 




100 




LDX 


#0 




C002 


8A 






110 


LOOP 


TXA 






C003 


9n 


00 


04 


120 




STA 


VIDEO, 


X 


C006 


A9 


01 




130 




LDA 


#1 




COOS 


9D 





D8 


140 




STA 


COLOR, 


X 


C00B 


B8 






150 




I NX 






cooc 


DO 


F4 




160 




BNE 


LOOP 




C00E 


60 






170 
1R0 




RTS 
.EN 







99 



The Machine Language Book of the Commodore 64 

If you assemble this program and display the sorted symbol 
table, you will see; 



COLOR D800 LOOP C002 
VIDEO 0400 



Line 70 contains a pseudo- instruct ion = which directs the 
assembler to assign the value S0400 to the symbol VIDEO. 
Anytime you use the symbol VIDEO, the assembler knows to use 
the value S0400 to calculate the operands. 

Line 90 contains another pseudo- instruct ion, * = . It tells 
the assembler to begin the assembly process at memory 
location SC000. It is placed at the start of each program. 
Using it, you can instruct the assembler to place your code 
at any desired place in memory. 

What are the advantages of using symbols? There are two main 
advantages. First, through the choice of name, the purpose 
of an individual memory location can be easily determined 
(e.g. COLOR). Second, such a program is easier to change. If 
you enter the wrong location of the video RAM, you need only 
change the value of VIDEO at the beginning of the program. 
All references to this name are then changed. This is even 
more useful the more times such a name appears in a program. 

A pseudo-instruction, gives processing directions to the 
assembler. E-'or example, the pseudo-instruction .BY, tells 
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the assembler to place specific values in the machine 

language program. You can, for example, store data or text 
within your machine language program. The pseudo-instruction 
for this is called: 



.BY 



An operand in the range from to 255 must follow the .BY 
pseudo- ins t rue t ion. This operand value is placed at the 
current location of the program counter. Using .BY, you can 
insert symbols and constants into the program. For example: 



.BY 100 
.BY S7F 
.BY CR 



.BY has an additional option. Sometimes, you have to divide 
a 16-bit value into two 8-bit values. The operators > and < 
allow you to do this. The > symbol denotes the high-byte 
(bits 8 through 15) of a 16-bit value, while the < symbol 
denotes the low-byte (bits to 7). Here's an example: 



100 CONST = SAB3F 
110 .BY <CONST 
120 .BY >C0NST 



This program segment places the values $ 3 f ' and $AB in the 
program. These operators can be used for immediate 
addressing with the # character, for example: 
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130 LDA #<CONST 
140 LDY #>CONST 

In order to use zero-page addressing, you must prefix 
operands with an asterisk, *. If you don't, the assembler 
uses absolute addressing. This is not necessary for indexed 
addressing which works only with zero-page addresses. 



OOBO 100 START = SBO 

C000 AD BO 00 110 LDA START 

C003 A4 BO 120 LDY * START 

C005 8D 27 00 130 STA S27 

COOS 84 60 140 STY *S60 

C00A 24 B0 150 BIT *START 



The above example shows you that without the asterisk (lines 
110 and 130), an absolute addressing mode, three-byte form 
of the instruction is generated. The zero-page addressing 
mode is selected by placing the asterisk in front of the 
operand, resulting in a two-byte instruction (lines 120, 140 
and 150). 

Now that you are acquainted with the functions of the LEA 

assembler, you can concentrate on programming. On the next 
pages you find the listing of the LEA assembler and a short 
description of the operations and the variables used by the 
program. 

Try not to key the listing "blindly". Read the description 
of the routines as you go along, and try to understand how 
the assembler works. By doing this, you can learn not only 
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about the operation of the assembler, but also something 
about machine language as well. 

You can also order a diskette containing the LEA assembler, 
6510 Single-Step Simulator and Disassembler. This saves you 
the time and effort of keying these programs from the 
listings. See ordering instructions in APPENDIX F. 
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100 REM 6510 ASSEMBLER 

110 PRINT CHR*(147> : PRINT 1 PRINT : PRINT , "6510 ASSEMBLER" l PR1NI : I>G=S 

120 INPUT"SOURCE FILE NAME ";SN* 

130 IFR1GHT* <SNI ,4 } = " . SRC"THENSN*=LEFT* <SN*,LEN I SNS1 -4 ) 

140 DD*="0":REM DRIVE NUMBER 

150 INPUT"LISTING Y/N " | A*t IFA*<>" V"THENPM«il Q0TO190 

160 PF=4:PG=3 

170 1NPUT"PRINTER Y/N " i A*: IFA*=" Y" I HENPG-4 

180 OPENPF.PG 

190 QOBUBSOOOiREM BUILD 1ABLES 

200 A=-0: AD=49 152 J PRINT; PRINT: PA=A 

210 PRINT"PASS 1" :G0SUB4000:PRINT"PAS5 2":FFX"*0»FEX-0 

220 0P*=DD*+": "+SN»+".SRC" 

230 OPENS, DG,0, OP* 

240 GETftB,A*,A*:REM START ADDRESS 

250 1FPM=1THENPR1NTCHR*C145> , ,2N* 

260 FX-Os IFAD>65535THENPRINT : PRINT : PR I N t "MEMORY U'.'ERF I OH "■ : L4IJ I 01 

270 A=ADjGQSUB3240iPRS=A*+" " : GOSUB2O00 I IFLEf- 1 I < X*,3> = " . EN" I HEN] 

2B0 XX*=LEFT*<X*, 1) s IFXX*=" *"THENPRS=" ":LN*-" 

290 IFXX*=". "ORXX*="*"0RXX*="="THENGOSUB29O0:G0rO380 

295 IFXX*=""THENPR*-PR*+" M :GQr0430 

300 0NLM7.G0T0320 

310 SA=0F+AD:PA=AD:LM7.= 1 

320 XX*=LEFT*<X*,3) rF0RJ«0TONNX> ifxx*=mn* U1THEN330 

330 NEXT 

340 FL*<1)="A" : A7.= 1 : F7.= l : G0SUB1520: BD1 D370 

350 EOSUB2400:F7.=0: IFT7.=5ANDT7. ( J , 9) >0THENT*'.=9: REM RELAI IVE 

360 DNT2+1B0SUBS0O , 600 , 600 , 600 , 600 , BOO ,300 , BOO ,500 , 900 , 600 , 600 , 800 

370 POKE OF+AD,A 

380 AD=AD+AV.l IFLEFT*U*,2>="*="THEN40O 

390 LX=AD 

400 REM *»*»#*** OUTPUT 

410 IFF7.=0THEN1FFL* (O)-" " ANDFL* ( 1 ) -" " ANDFL* ( ..' I ■" "THEN430 

420 B6X-B8X+I 

430 ONPMB0T025O 

440 Y*=LEFT*<Y*+" ",11) :F0RI = 1 T03:PP!NI#PF ,H r ■ 1 ) : : II! CI 

450 PRINT#PF,PR*ZN*LN*" "LEFT*<XS+" ",6>Yt" "Mir 

460 GOTO 250 

500 REM ONE-BYTE COMMANDS 

510 A7,= l I A=T7. < J ,T7.) i [FA<UTHENFL* I 2) =" A" : UO I U 1510 

520 G0SUB3240sPR*=Pfi*+RIGHI*<A*,2> +" " I RETURN 

600 REM TW0-BY1E COMMANDS 

610 A=T7.(J, rXJ: IFA<0THENFL*I2>="A":G0T01500 

620 GDSUB3240: F R*=PR*+RIGH1 * ( A* ,2) 

630 YY*=YA*: IFLEFT * ( YYt , 1 ) = "#"THENYY*=MID* < YY* . -I I 

640 IFLEFT* I YY *, 1 ) « "•"THENYY *=M I D* ( YY t , .' i 

650 AV.=2: IFLEFT* (YY*, 1 )=" 1 "GRLEF I* ( YY*, 11=";" I HEMYY*-M I D* I , • , I , . ■ 

660 A*=LEFT*(YY*, 1) ; I FA*""* "OR A* "/"ANDAf " : " I Hl-Niil- (\ I ; ■■ 

670 SL*=YY*:G0SUB4500 

680 A*="*"+HE* 

690 G0SUB31OO 

700 IFLEFT*(YA*,2)="tl,-"THENB=INT(A/HI! 

710 IFLEFT* ( YA*, 2) =••»<•• THENA=A- INI (A/ HI ! MH I 

720 IFA>LOTHENFL* ( 2) ="0" : F7.= 1 lfl-0 

730 SOSUB3240:P0KE0F+AD-t-l , AL'/.:PR*=PRS+" " +RISH I t '( "i n >" i f , t . . > I " " 

740 A=T7. (J, TV.) : RETURN 
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600 REM THREE-BYTE CUMflANDS 

BIO A 7.= 3 

B20 A=ry. (j ,TX> 

630 G0SUB3240:PR-F=PRS+R1GHT*<A*,2) 

94" A*=LEFT*<YA*, 1 > : IFAt = "*"ORfl* >" /"ANDA*-: " ; " 1HENA*=YA*: UO I 0B70 

@50 SL*-YA*:G0SUB4500 

B60 A*«"*"tHE* 

870 G0SU83100l BUSL1B324M: rut- IT-: I ■ + ■■ "-i-RItiH t t ■ "■ i. i" . ,it , _■ I . " " H EF 1 * 

IA*,i!>+" 

S80 P0KE0F+AD+1 , AL%: P0KE0F+AtH-2, AHV. 

B90 A=T7. ( J , T7.) : RETURN 

900 REM RELATIVE 

910 AX-Z 

920 A=T7. (J ,T;:> :GOSUB324o:PR*=PHJ +RI13HT* (AT . . 

930 AS-LEFT*<Y*,1>I IFA*="*"(JRA* " /"ANDA«< " : " I HENA*=Y«: GO FD960 

940 SLJ=»Y*:GOSUtl4f.'io 

■ f = "i"<-HE* 
960 BQSUB3100: IFF LI (2> = "IJ"lHENA=AD+2 

970 DF=A-(AD->-2> : IFDF< - 1 28DRDF 5 127 THENFL* (3) = "R" ! F7.= ! : DF=0 
9B0 A=DFANDLQ:GQSUB3240 

990 PRS=PR*+" "+RI 6HT* < A» , 2) +" " : POKEOF -KiU+1 , As A =17. < J , IK) I RETURN 

!<X>0 PR*=»" "I IFFX«OTHEN1020 

1010 BB7.oBS7.-l-l 
1020 IFAe<AD+0FTHENAE=MD*OF 
H>30 0NPMGGT0106O 

1040 F0RI=or03:PR!NT#PF,FL*( 1 I ; :NEXT 

1050 PEINlttPF.PRf .ZNt.LNt" "LEFT*<X*+" ",6>Y«" "RMT 
1060 CLQSEB: INPUT"SAVE Y/N " s AS: IFAI- ." V" tHENl 1 30 
II 'O AT=DD* + 1, : "+SN*+".OBJ" 

1080 H7.=LEN<A*> : POKE 1B3, AX: POKE I B7 ,681 ANDLU: P(».E 1 BB . 6B1 /HI 
1090 F0R[ = 1 rOAV.lPO) E6B0+I , ASC (MI DI ( A*, I ) > :NEX I tREM FILENAME 
1100 A=SA:LiOSUB3240: POKE 251 , AL7. : P0KE252 , AH7.I REM STAR! ADDRESS 
1110 A=AE:GDSUB3240:POKE7B1 , AL7.lP0KE7B2,AH*/.!REM END ADDRESS 
1120 POKE7a0,2SliSYS654?6aREM SAVE 

1130 A=PA; G0SUB324O:PA*=A*: A=AD; G0SUB324O: AD*=A* : A=AD-PA: BDSUB3240 
1140 BA*=A*:0NPMGDTD1 ISO 

1150 PRINT#PF:PRINTttPF,PAf " / "AD*" / "BA* 
1160 PHINT#PF,"SOURCE FILE IS "SNf+".SRC" 

I 170 PRlNTttPF,B5'/."ERRDR(S) ":PRINT*PF 

II BO INPUT "SYMBOL 1AELE Y,N " ; 1 t : 1 FZ* :. " Y" THEN 1 400 
1190 MX=2: IFPG 3THENPRI N I BPF , CHRS 1 12) : MX=5 

1200 INPUfSORT Y/N " ; Z*: IFZ*=" Y" THENl 300 

1210 ONPMGaTOllvo 

1220 nX-OlP»-"" : FDRI=LL7.T0ULV. 

1230 £FLB*(l>=" "THEN1290 

1240 P*-P*-H_B*U>+" "+HE*(I)+" ":M7.=M7,*1 

1250 IFt-1% 1-1 X THEN 1290 

1260 DNPMB0TD12S0 

1270 PRINT*PF,PJ: 

12SO PI="":M7.=0: IFI >=UL7.1 HEN1400 

1290 NEXT I : IFPSO" "THEN1260 

1300 HI t=CHR*< 127)+CHR*(127H-CHR*(127)-4-CHRf I 1271 +CHRJ (127) lFX-0 

:PEM SI IF: I 

1 510 M7.=OlSL»=HI*:FORl=LL7.TOUL7.: IFLB*(I)»" 'THEN1340 

SL*THENSL*-LB*<I) :M7.=1 + 1 
1330 UL7.= I 

1340 NEXT I : 1FF7.. MXIHEN1 ■ 
i 550 FX=0s IFPH-OTHENPRINT«PF 
1360 IFMX=0THEN140i • 
I 570 DNPMGDT0I390 
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1380 PRiNTttPF,SL*" "HE*<MX-1 > " " ; 
1390 LB*tWX-l)=" "iFX-FX+iiBOTOiSlO 
1400 REM 

1410 IFPG=4THENPR I NT*IPF , CHR* (12) 
1420 CL0S£PF:END 

1500 P0l<.E0F+AD+2,0iREM NOP FILLER 
1510 POKEOF+AD+l ,0 
1520 A=": PftJ-pRf+NPJ (A7.) :RETURN 
1600 IFLEFTi (LNf , 1 )=" . " THENI=-1 : RETURN 
1610 IFMID*<LN*,4,1 ) < >" "THENI=NN}.+ 1: RETURN 
1620 MNJ=LEFTHLNI,3> : REM LABEL=MNEMONIC? 
1630 F0RI=0TQNN7.: IFMN*: >MN* I I ) THENNEXT 
1640 RETURN 

2000 BET#B,A*,B*: IFA*+B*=" "THEN2290! REM LEFT ADDRESS 
2010 GET»B,Z1*,Z2* 

21 . - ^N^ASClZlf-t-CHRf <0> >+HI#ASC(Z2*+CHR*(0> ) 
2030 ZN*=RI6HT*<" " +STR* ( ZN> , 5) +" " 
2040 GDSUB2300: I FFF7.THENRET URN 
2050 CN*=" '*: X*=" " : Y*=" " : RM*"" " : X%-0 

2060 FDRI=0TD3:FLJ:(I)=" " : NEXT I : IFZ*="»" THEN2190 
2070 IFZ*="; "THEN22S0 
2030 REM LABEL NAME 

2090 IFZ*=" "DRFF7.THENLN*=LEFTt <LN*4-" " ,5) : EOT02120 
2100 LN*=LN*+Z*: IFLEN (LN-f) =6THENXV.= 1 : FL* (0 > ="L" 
21 10 E0SUB23O0: BOT02090 

2120 6DSUB1600: IFI<-NNy.THENX*=LN*:LN4:=" " : 60TD2200 
2130 X7.=A5C<LN*> : IFX/:-: 65GR X"; 9i j THENFLf- (0) ='*S" 
2140 REM OPERATION 
21SO GQSUB2300: IFFF7.THEMRE [URN 
2160 IFZS' ■" "THEW2190 
2170 S0T0215O 

21B0 GOSUB2300: IFFFV.THEMRETURM 
2190 IFZ*<>" "THENX*-X*+Z*iGOTQ2180 
2200 IFFF7.THENRETURN 
2210 IFZ*=" ; "THEN22B0 
2220 1FZS-, >" "THEN22605REM OPERAND 
2230 GDSUB2300: I FFF7.THENRE TURN 
2240 GOTQ2200 
' SO B0SUB2300: I FFF7.1 HENRE IURN 

2260 IFZ*<: THENY*=Y*+Z*iGaT02250 

2270 G0SUB2300: IFFF XI HLNREUIRN: REM COMMENT 
2200 RM#=RM*+Z*!ea I D227I i 

2290 X*= ". EN" :RM*=" END ASSUMED" :LN*=" "-.'.*= ZMf=" ":RE1 

2300 6ET#B , ZS: FF/1= Z *= " " : RE TURN 

2400 REM DETERMINE ADDRESSING MODE 

2410 IF Yir=' ,,, THENT7.=B:RETURN:R£M IMPLICIT 

2420 YAS=Y*: IFLEFIr (YA*, 1 >=" ( "THENYAf =MIDS (YAf , 21 

2430 1FRIGHT*(YA*. !)■ I HFNY Af =LEP T * < YA* , LEN < YA* > - 1 > 

. 441 ' IFRIGHT* '. (M . : • -' ') . , " I Ml NYA*=I FPU I YA* ,LEN ( YA*> -3) 

2450 IFRI6HTi(YAJ,2l --" , Y "ORRI GHT* ( YA* ,21 =" , X'« THENYA* =LEF TS (YA* ,LEN 

■ i .it I -2) 

2460 Z*=Y#sK*=LEFT*(YS,l) 

2470 tFZ*="A"THENT7,=":KE I URN: REM ACCUMULATOR 

2480 IFK*«"#"THBNTy.= l:RETURNsREM IMMEDIATE 

2490 IF! *=" C" IHEM2.: -1-I-1 [NDIREC1 

2500 ZP=K*="*":REM ZERO PABE 
2S10 Z*=MIDS (Y*,2+ZP) 
25.. '< > EFLENlZ*) 21HEN2SS0 
2330 l-*=MID* CZ*,LEN(Zt I -1 ,1 I 
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2540 IFK»=","THEN2570:REM INDEXED 

2550 T"/.=5 

2560 T7.=T7.+3*ZP; RETURN: REM ABSOLUTE OR ZERO-PAGE 

2570 K*=RIGHT*(Zf, 1 ) : IFK*="X"THENTX=6:B0T02560 

2580 I FK* = " ¥ "THEN T7.=7 : GOT02560 

2590 T7.=-l: RETURN: REM SYNTAX ERROR 

2600 K*=RIBHT* ( Z* . 1 ) : IFK*=" ) "THEN2630 

2610 IFR1GHT*(Z*,2> < J " , Y"THEN259'i 

2620 T7.= l 1 : RETURN 

2630 I FM I D* ( Z* , LEN < It ) - 2 , 2 > = " , X " 1 HENT V.= 1 O: RE 1 1 IRI I 

2640 TX-12: RETURN 

2700 IFX*="="THEN2730:REM PSEUDO-OPS PASS 1 

271 IFLEFT* ( X* , 2 ) = " *= " THEN27S0 

2715 IFLEFT* (X#, 3 >=" . BY" 1HENA7.= 1 : RETURN 

2720 A7.=0: RETURN 

2730 A7.=0: 1 FYS=" *" THENRE 1'URN 

2740 A7.=ASC(LEFT* (LN», 1 ) ) : IFA7.:, 65DRA7. : 90THENRE TURN 

2750 A*=LEFTSiY«, 1) : I FA*-. ' "fHNDiA*- """ORA* .: ■"9" ) THENRETURN 

2760 A*=Y*sGOSUB310O! IFFXTHENML*(HCX)=FI_*<2> : RE TURN 

2770 GOSUB3240:HE*(HC7.>=RIGHT*<"0000" KfiS,4) ! RETURN 

27B0 A7.=0: Y1*=LEFT*(Y*, 1 ) : IFY1*="*"GRY1*>" / "ANDY 1 *< " J " THEN 2800 

2790 RETURN 

2800 A*=Y*:G0SUB3100: IFFXTHENRETURN 

2810 HA«A«BOSUB3240!XX-A8C<LEFT*<LN*+CHR*<0> , 1 > > s IFXZ 64ANDXX<9j 

THENHE* (ML:-:) =ft* 

2820 RETURN 

2900 IFXX*="-"THEN2940:REM PSEUDO-OPS PASS 2 

29 1 IFLEFT* < X* , 2 ) = " *- " THEN2990 

29 15 I FLEFT* < X* , 3 ) =" . BY" THEN299 1 

2920 FL*(1)="S" 

2930 A7.=0:F7.= 1 : PR* = " ": RE TURN 

2940 AZ"Q 

2950 A*=LEFT* ( Y* , 1 > 

2960 IFA*'. >"*"ANDA*< >"*" AND < A*< "0"ORA* "9") 1HENFL* I 2) ="S" : GO f 02930 

2970 SL*=LN*:F7.=0:GOSUB45OO: IFFZTHENFL* (0> =FL* (2 ) :FL*<2>=" ":GOr02930 

2980 PR*=HE*+" ": RETURN 

2990 A7.=0:YZ*=LEFT*(Y* , 1) : IFYZ*="*"ORYZ* > •" / "ANDYZ*< " : "THEN3010 

2991 YZ*=LEFT*(Y*,1) : LH7.=YZ*= " .; "ORYZ*= " <■ ": YA*«MID* (Y*, l-LHX) 

2992 YZ*=>LEFT*<YA*,U : IF Y Z* = " * "ORYZ* > " / " ANDYZ*< " : "THENHES=YA*: GLI I 02994 

2993 SL*=YA*:F7. = 0:GOSUB4500:HE*="*"+HE*: IFF7.THENFL* (0) =Ft* (2) 
:FL*<2>=" " 

2994 A*=HE*:G0SUB31OO: IFA>LQANDLHX=0THENA=Ol FL* ( 1 ) ="0" 

2995 IFLEFT* (Y*, 1 )=" >" THENA-IN T (A/HI > 

2996 IFLEFT* (Y* , 1 ) ="< "THENA=A-INT (A/HI ) *HI 

2998 POKE AD , A: A7.= 1 : G0SUB3240: PR* =F'R*+R I BHT* < "00" +A* , 2 > + " " 

: RE I URN 

3000 FL* ( 2 > = "S" : F7.= l i GQT03030 

3010 A*=Y*:GOSUB3100: IFF7.THEN3030 

3020 AD=A:GQSUB3240:PR*=A*+" " 

3030 PR*=PR*+" ": RETURN 

3100 REM CONVERT HEX -■ DEC A* -> A 

31 10 2*=LEFT*tA*, 1 ) : IFZ*="*" T HENAt^R I GH I * 1 A* , LEN ( A*) -1) :GDT03150 

3120 IFZ*<"0"0RZ*>"9"THENFL*(2>="S":F7.= 1:REIIJRN 

3130 A=VAL(A*> : 1FA;655350RA<OT HENFL* (2 > = "0" : I ". I 

3140 RETURN 

3150 A=0:L7.=LEN(A*> : IFL7.>4THENF7.= 1 : FL* (2)="L" : RETURN 

3200 F0RI = 1T0L7.: AA7;=ASC (MID* ( A* , I) ) -48 

3210 I FAAX< 0ORAA7. >9THEN I FAA7.< 1 70RAA7. >22THENF%= 1 : FL* < 2 ) = "S " : RET URN 

3220 IFAAX>9THENAAX=AAX-7 

3230 A=A+AA7.»16T (L7.-I ) : NEXT: RETURN 

3240 AH7.=A/HI : AL7.=A-AH7.#HI i A*=A* (AH7./ 16) +A* (AH7.AND15) +A* ( AI.7./ 16) 

+A*(AL7.AND15) 
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5250 RETURN 

DIKLBSI349) ,HE*<349> ,ML*(349) sHA=AD:REM CONSTRUCT ADDRESS LIST 
4010 FOR 1=01034=?: Lbt i I > = " "s HE*< I)="0000"5ML*( I )•»" "iNEXT 

4020 0P*»DD*+"i " <-SNf + •'.SRC ,, 
4030 OPENS, DG,0, OP* 
4040 GET*B,Ar,Ml :l.l X=349 

IFS1 OTHENCI MBEH;END 
4060 GDSUB2000iPRINTCHR*(14S) ,ZN*s IFLN* =" "i ikl.KF- IMm.l)-" "THEN4210 

I CLEFTS(LN*,t> ) ilFXX<630RXX 90THEN4210 
4080 GOSUE-4 I 'X': Bl IT041 50 

4090 LN*=LEFT*(LN*+" ",5):REM GENERATE HASH CODE 

■I : » HC=0sFuRI=lT05 
■II LQ HCX~ASC(MID4 (I IT* ,1,1) ) : HC=HC<- IHC*/./ 1 O- [HI (HCX/IO) ) HOI (&-I>sNEXTI 

■ •. HI 307- INT (HI ' ' • ' lOsRETURN 

. : ■ ,, 

4140 IFLB*i HCX ■ " " MEN4180 

41S0 I ;■, 1 1! \ i ill : H! ■ i tin •■.. t,t: IFHCX>ULXTHENULX=HCX 
4160 1FHC 1 ,: LLXTHENLLX=HCX 
41 70 GDT04: 

4 1 80 I FLB* I KCX ) =LN rl HENML * ( HCX > « "M" : G0TO42 1 O 
4190 HCX HCX+1: IFHC5K350THEN4S40 

:'R[NT"SYMBOl TABLE FULL" : CLOSES: END 
•I 2 10 I F .. t - " . EN " THLNCLGSEB t RE T UR1 1 

LEFT*(X*,1) jIFXX*=". "ORXX*="«-"ORX>: s I mi niiiikiir , .','00:HA"HA+A7. 

: 

FX=0: XX*=LEFTr (X*, : ' : I ORJ« ITQNNX! [FXX I NN*CJ > I HENML a I :GOrO4270 

: ; 400 

41:50 IFTXi I, '. IEI 

iTHENTX»9:0OTO428O 

-.--1 : Hh=Hi 
42B0 HA»HA*LX(TX> : 

REM • • St ARCH FUR LABI 

SL*. 1 ! ) : [FXV.- 650RXX 0THENFL*(2) "S" : F - l= 1 : HE*^"' > " 

: RF 1 1 IRN 

'■" . [FLEI I II . - "L " 

SV*=1 N*:LN*-&LI:GabLiB4090:SL*»LN*!LN*«BV* 
4S40 IFLB*(HCX)=" "ORHCXLILXTHENFLr. . : . »U":FX« I !HE*»"0O00"t RETURN 

455" IFLB*(HCX)< HLfTHEi; 

'. IHENFL*C2) "ML* ■ 

II 

. ■ ' : III I4S40 
; ' ""• •-■> -"": I- !:REM DIVIDE » 1 INTO n* AND .i 
► ,I,I "."THENYH ri*-H1ID*<V*, 

in V*) rHENFX= 1 i RETURN 
: r mi'i .i.I.li M , "THENI = I+1:SOT04600 
1 FX=J sRE I URN 
MIDI (Y»,I, I) i ft rHENFX 0»RE thru 

46S0 I IM: BOTI I 
: IV.tH] 
A' ' ,MN*(NNX . . ,| i > i : | ,ni . , • . 

'•". " i MF i ' ■: 015: Rt .iD.'VTi I > :NEXT 

50 »0 NP* ■ 1 i "00 ■■:!!( i:_ ■■ „•, -.,, • , ,. 

: - 

IRJ-OTONNXiREADIWM IJ 0T0I2jREAD«*: IFmI "-1-IHI i 

■ 

■ :l DRI = 1T0: I «=ASI iRihin I (A*.l>) 46. • . v. - -,, ,, 

I I • :ll[ ■ . I 
5070 T-- I :NE< I : RETURN 

53 :REM NUMBER Dl 
6010 DATA 0,1,2,3,4,5,6, ',S,9,A,B,I ,D,I ,1 

1,2,2,2,2,3, . ,1,2,2,2,3 
' DA ,-1.69,65,73, 1 , 7t ,-l 
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70 SO 


DATA 


7020 


DATA 


7030 


DATA 


7040 


DATA 


70S0 


DATA 


7060 


DATA 


7070 


DATA 


7080 


DATA 


7090 


DATA 


• 1 i 10 


DATA 


7110 


DATA 


7120 


DATA 


7130 


DATA 


7140 


DATA 


7150 


DATA 


7160 


DATA 


7170 


DATA 


71 B0 


DATA 


7190 


DATA 


7200 


DATA 


7210 


DATA 


7220 


DATA 


.'?-,!"! 


DATA 


7240 


DATA 


7250 


DATA 


7260 


DATA 


7270 


DATA 


72B0 


DATA 


7290 


DATA 


7300 


DATA 


7310 


DATA 


7320 


DATA 


7330 


DATA 


7340 


DATA 


7350 


DATA 


7360 


DATA 


7 -.70 


DATA 


■- ;bo 


DATA 


7390 


DATA 


7400 


DATA 


7410 


DATA 


7420 


DATA 


7430 


DATA 


7440 


DATA 


7450 


DATA 


7460 


DATA 


7470 


!>,', 1 A 


7 4 B0 


DATA 


7490 


DATA 


■" 


DATA 


7510 


DATA 


7520 


DATA 


7530 


DATA 


7340 


[>,-,!.■', 


7550 


DATA 



AND , - 1 , 29 , 25 , 35 , - % , 2D , 3D , 39 , - 1 , - 1 


21, '1 


-1 


ASL,0A,-1 , 06, 16, -1,0E, IE, -1,-1,-1 


-1 , -! 


- 1 


BCC,-1 ,-1,-1, -1,-3, -1,-1, -1,-1, 90 


-1 .-1 


-i 




-1,-1 








BE0,-1 ,-1,-1,-1,-1,-1 ,-1,-1, -1,F0 


-1,-1 


-1 


BMI.-l ,-1,-1,-1,-1,-1,-1,-1,-1,30 






BIT, -1,-1, 24,-1 ,-l,2C, -1,-1,-1, -J 


1 . i 


1 


BNE,-1 ,-1,-1,-1,-1,-1,-1,-1,-1 ,DO 






BPL ,-1,-1,-1,-1,-1,-1,-1,-1,-1,10 


-1,-1 


- | 


SRK, -1,-1, -1,-1 ,-1,-1,-1,-1,00,-1 






BVC,-1 ,-1,-1, -1,-1, -1,-1, -1,-1 ',50 


-1 , -1 


- i 


BVS,-1,-1 ,-1,-1,-1,-1,-1,-1,-1,70 


-1 , -1 


- 1 


CLC,-1,-1 , -1,-1, -1,-1, -1,-1, IB, -1 


-1,-1 


- 1 


CLD,-1 ,-1,-1, -1,-1,-1,-1,-1,158,-1 


-1,-1 


- i 


CLl,-l,-l,-l,-l,-i;-l, -1,-1, 58,-1 


-1,-1 


-1 


CLV,-1 ,-l,-l,-l,-l,-l,-l,-l,BB,-l 


: . i 


-1 


CMP,-1,C9,C5,D5,-1 ,CD,DD,D9,-1 ,-1 


C1,D1 


• : 


CPX,-l,EO,E4,-l ,-1, EC, -1,-1, -1,-1 


-1,-1 


-l 


CPY.-l ,00, C4,-1,-1,CC, -1,-1, -1,-1 


-1,-1 


-l 


DEC,-1 ,-1 ,C6,De,-l ,CE,DE,-1 ,-1 ,-1 


-1 .-1 


- i 


DEX.-l, -1,-1,-1 ,-1,-1 ,-S,-l,CA,-l 


-1,-1 


-l 


DEY.-l ,-l,-l,-l,-l,-l,-l,-l,B8.-l 


-1,-1 


-l 


EOR,- 1,49, ,45, 55, -1,40,50,59,-1,-! 


41 ,51 


■ 


I NC,-i,-i,E6,F6,-I,EE,FE, -1,-1,-1 


-1,-1 


-l 


INX,-l,-l,-l,-l,-l,-l»-l,-i,EB,-l 


-1 , 1 


- 1 


INY,-1,-1,-1,-1,-1,-1,-1,-1,CB,-1 


-1,-1 


-l 


JMP, -1,-1, -1,-1,-1, 'It, -1,-1, -1,-1 




,6C 


JSR,-1 ,-1,-1,-1,-1 ,20,-1 ,-1,-1 ,-! 


-1,-1 


-1 


LDA,-1 , A9,A5,B5,-1 , AD ,BD, B9, - 1 ,-1 


Hi ,H) 


1 


LDX,-1 , A2,A6,-l ,B6,AE,-1 ,BE,-1 ,-1 






LDY,-1 , AO,A4,B4, - 1 , At , HI.' , - 1 , - 1 , - 1 






LSR,4A,-1 , 46, 56,-1 ,4E,5E, -1,-1,-1 


-1,-1 


-1 


NlIP , - 1 , - 1 , - 1 , - 1 , - 1 , - 1 , - 1 . - ! , EA , - 1 


-1,-1 


-I 


DRA,-1 ,09,05, 15,-1 ,0D, ID, 19, -J ,-1 


'.'1,11 


- ! 


PHA,-1 ,-1,-1, -1,-1, -1,-1,-1, 48,-1 


-1,-1 


-1 


PHP.-l , -1,-1,-1, -1,-1, -1,-1, 08,-1 


-1 ,-i 


: 


PLA,-1 ,-1,-1,-1,-1,-1,-1,-1,68,-1 


.-1 .-1 


-1 


PLP,-1 ,-1 ,-1,-1 ,-1 , -1 .-1 , -1 ,28,-1 


- 1 , - 1 


I 


ROL ,2A , - 1 , 26, 36, -1 , 2E ,3E , -1 , -1 , -1 






R0R,6A,-1 ,66,76,-1 ,6E,7E,-1 ,-1 .-1 






RTI,-1 ,-1,-1,-1,-1,-1,-1,-1,40,-1 


-1.1 


-1 


RTS,-t ,-1,-1,-1,-1,-1,-1,-1,60,-1 


-1,-1 


I 


SBC,-1 ,E9,E5,F3,-1,ED,FD,F?,-1,-1 


El ,F i 


- : 


SEC, -I ,-1,-i ,-1,-1 ,-1,-1,-1,38,-1 


-1,-1 


-1 


SED,-1 , -1,-1,-!, -1,-1, -1,-1, PH. -1 


: , i 


-1 


SEI, -1,-1, -1,-1, -1,-1, -1,-1 ,78, -i 


-1 ,-1 


; 


STA , - 1 , - 1 , 85 , 95 , - 1 , 8D , 9D . 99 , - 1 , - 1 


■ 


1 














TAX,-1 , -1,-1, -1,-1, -1,-1. -1, AA.-l 






T.V/,-1 , -1 ,-1 ,- 1 ,-1,-1 ,-1 ,-1 ,AS,-1 


-1,-1 


-1 


TSX ,-1,-1, -1,-1,-1, -I, -l,-t,BA,-l 


-l.l 


- i 


TXft, -1,-1, -1,-1, -1,-1, -I, -1,8A,-I 


-i.-i 


1 


TXS, -1,-1, -1,-1 ,-1,-1,-1, 1 ,9A,-1, 


- 1 . - 1 


- t 


TYA,-1,-1, 1 . -1 ,-1 ,-1 ,-! ,-l ,',■!!. i 


i . l 


! 
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Description of the 6510 assembler and the important variables. 

100 - 190 Display title, read source Eile name into SSN, 
prompt for assembly listing. Variable DG is set 
to the device number for listing depending on 
the answer. The variable PM determines if the 
listing is wanted or not. Call routine to 
initialize the variables with GOSUB 5000. 

200 - 460 Main loop of the program. Line 210 performs pass 
1 as a subroutine (GOSLIB 4000). Source program 
Eile opened for reading from disk. IE listing is 
not required, display only the line number $ZN 
(line 250). Variable for printer output, PRS, is 
constructed. Line 320 checks for legal instruc- 
tions. Set error flag if illegal instruction and 
place BRK instruction at that location. Line 350 
determines addressing mode (GOSUB 2400). 

Determine direction of branch Eor relative 
addressing mode. Call subroutine from line 360 
to build string for printing the listing 
(depending on addressing mode and length of 
instruction). Write generated code to memory 
from line 370, Increment program counter in line 
380. Print listing in lines 400 thru 460. If 
error is found, increment error counter in line 
420. Display complete assembler source statement 
in 1 i ne 4 50. 

500 - 520 Handle one-byte instructions. Variable A% is set 
to the number of bytes and the instruction code 
is determined by using T%. A negative value 
indicates that this instruction cannot use this 
addressing mode. In this case, branch to 1510, 
to insert a BRK instruction (zero) instead. 
Otherwise, convert the opcode to hex and place 
in the print string. 

600 - 740 Handle two-byte instructions. Determine opcode 
in line 610. Place opcode in print string in 
line 620. Check for immediate addressing, oper- 
ators < and > and zero-page addressing (denoted 
by "*"). Determine if operand is number (hex or 
decimal) in line 660. If not, get value of the 
label in line 670 (GOSUB 4500). Convert value of 
operand to hex. Modify the value according to 
the operators < and > in line 700 and 710. Range 
check for value greater than 255 in line 720, 
Insert value in memory and add to the print 
string . 

800 - 890 Handle three-byte instructions similar to two- 
byte instructions above. Calculate offset and 
check for legal address range in line 970. If 



110 



The Machine Language Book of the Commodore 64 



illegal, display "R" (range) error and set 

offset to zero. Convert negative values to two's 
complement in line 980. Insert the value in 
memory and add to print string. 

1000 - 1420 Execution is transferred here when the assembly 
is done. Display last line of assembly. Prompt 
user to save generated code to disk. If yes, 
setup filename, starting and ending addresses 
call operating system SAVE routine with SYS. 
Display range and length of the generated code. 
Prompt for symbol table display. Sort into 
alphabetical sequence in lines 1200-1400. 

The following are the subroutines which are called from the 
main routine and perform such operations as number 
conversion. 

1500 - 1520 Output one or two zero bytes if an error was 
detected during the assembly. 

1600 - 1640 Determine if first field is a mnemonic for an 
instruction or a label. If it is an instruction, 
assign to variable I the index of that 
instruction in the assembler's internal tables. 

2000 - 2300 Read a source program line from disk and 
separate into line number, label, instruction 
mnemonic, operand, and comments. The routine at 
2300 reads one byte from disk into the variable 
Z$. Flag FF% is set if the byte is zero (end-of- 
line marker). The first two bytes, which contain 
the link address, are not used, if both are 
zero, however, the end of the program has been 
reached and ".EN" in indicated. Otherwise, the 
line number is obtained from the next two bytes. 
Find next field by searching for first blank or 
the end-of-line. If a semicolon is found, the 
text following is assigned to the variable as 
comments. Otherwise, the variable ZNS contains 
the line number, LNS contains the label name, X$ 
contains the instruction mnemonic, Y$ contains 
the operands, and RMS contains the comments. 

2400 - 2460 Determines the addressing mode of an 
instruction. Check for characters "(", ")", "," 
and "X" and "Y". Immediate addressing mode is 
recognized by "#", and zero-page addressing hy 
"*" (variable ZP, line 2510). Addressing mode is 
indicated by variable T% as value between zero 
and twelve. A negative value indicates an 
illegal addressing mode. 
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2700 - 2820 Handles the pseudo- instruct ions " = ", " = *", and 
".BY". Called during pass 1 and is used for such 
things as label definition. 

2900 - 2998 Handles the same instructions as the previous 
routine, but for pass 2. This routine places the 
codes for ".BY" commands in memory. 

3000 - 3030 Calls the following routines for number conver- 
sion and is used to initialize the print string 
with the address of the program counter. 

3100 - 3230 Convert a hex number in AS to a decimal number 
in A. 

3240 - 3250 Convert a decimal number in A to a hex number in 
AS. AL% and AH% contain the low and high bytes, 
respectively. 

4000 - 4280 Perform pass 1 of the assembly. Performs label 
searching and assigning their values. Also dis- 
plays the line numbers (line 4060). A hash-code 
procedure is used for symbol table to speed 
searching using variable LBS ( ) . The corres- 
ponding hex code is placed in HESU. The length 
of each instruction is determined from the 
addressing mode, so that the labels can be 
assigned the correct values. Check for duplicate 
labels. Increment the program counter after the 
determining the address mode T% using the field 
L*() with the corresponding length of each 
address mode. 

4500 - 4650 Called during pass 2 to determine the value of 
the label passed in SLS. If the label is not 
found, an error flag is set, otherwise the htx 
value is returned in HES. 

5000 - 5070 Initialize all variables from the following DATA 
statements . 

6000 - 7550 DATA statements for the converting from decimal 
to hex, instruction lengths for different 
addressing modes, instruction mnemonics and 
corresponding operation codes and allowable 
addressing modes. 
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The following describe Che usage of the major variables of 
the assembler. 

SNS Contains the name of the source program 
(without suffix ".SRC"). The machine code 
produced is saved under the same name, with the 
suffix ".OBJ". 

DD$ Contains the drive number. 

PG Contains device number of the output device for 

the listing; 3 = screen, 4 = printer. 

PM Flag for ignoring printer output (=1). 

A actual address value 

AD immediate program counter during the assembly 

ZN$ line number being processed 

LN$ label name 

X$ instruction mnemonic 

YS operand 

RM$ comments 

T% address mode (zero to twelve) 

OF offset for storage of generated code (0=not used) 

A% length of instruction 

A$ hex representation of the actual address A 

SLS label to search for. Must contain the name of 
the label being searched for when calling 4500. 

HES hex value of the label 

LO constant 255 

HI constant 256 

DF address offset (difference) for relative add- 

ress ing 

BS% error counter 

MX number of labels per line for output of symbol 

table 

HIS "greater" label name for sorting 
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PRS string for output o£ a print line in the listing 

MN$ mnemonic 

Z$ character from disk 

NN% number of mnemonics {op codes) 

X% ASCII code 

ZP flag for zero-page addressing 

HA value of a label (during pass 1) 

F%, FF% error flags 

HC, HC% hash code 

FLS ( 3 ) error codes 
LBS(349) table of labels 

HF,$(349) table of corresponding values for labels (in hex 
code) 

T%{55,12) table of opcodes and address modes. The first 
index is the instruction word, the second index 
is the addressing mode. 

HNS(55) table of instruction words in alphabetical 
order. 
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6. A single-Step Simulator for the 6510 

IE you are still unclear as to how certain machine language 
instructions work, here's a tool that lets you observe the 
see the results of each instruction right on the screen. The 
tool is called a SIMULATOR. As the name implies, it 
simulates the operation of the 6510 microprocessor. When you 
RUN the SIMULATOR, it displays the actions and results of an 
instruction as if that instruction were really being 
executed. 

The SIMULATOR displays the following screen: 



PC AC XR YR SR SP NV-BDIZC 
0000 00 00 00 20 FF 00100000 



Here are the abbreviation used in the display: 



PC program counter 

AC accumulator 

XR X register 

YR Y register 

SR status register 

SP stack pointer 

n negative flag 

V overflow flag 

B break flag 

D decimal flag 

I interrupt flag 

Z zero flag 

C carry flag 



Beneath the abbreviations are the contents of each register. 
You can change the contents of any register or flag from tie 
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keyboard. To change the contents, press the appropriate 
letter as outlined below. If you press the letter of a flag, 
then that flag in "inverted". If you press the letter of a 
register, the screen prompts you for the change. Key in tie 
new value using a legal hexadecimal value and press the 
<RETURN> key. The new value replaces the old and the display 
is updated with the new contents. Below is a description of 
the keys and their respective contents: 



P Displays the current contents of the program counter. 
After changing it, the new value is displayed and the 
instruction located at this new address is disassembled 
and also displayed . 



A The contents of the accumulator are displayed. You can 
alter the contents by keying in the new value. After 
pressing <RETIJRN>, the new value appears in the register 
display. 



X The contents of the X-register are displayed. You can 
alter the contents by keying in the new value. After 
pressing <RETLIRN>, the new value appears in the register 
d isplay . 



Y The contents of the Y-register are displayed. You can 
alter the contents by keying in the new value. After 
pressing <RETURN>, the new value appears in the register 
display. 



S The contents of the stack pointer are displayed. You can 
alter the contents by keying in the new value. After 
pressing <RETURN>, the new value of the stack pointer 
appears in the register display. 



The status register SR cannot be changed directly. Instead, 
you have to change the individual flags which comprise the 
status register. If a flag is changed, the value of the 
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status register in the display is automatically changed as 
well , 



N By pressing N, the value of the Negative flag is 
inverted: 1 becomes and vice versa. At the same time, the 
contents of the status register are changed 
correspondingly, as already mentioned. 



V By pressing V, the value of the overflow flag is inverted 
as above. 



B By pressing B, the value of the Break flag is inverted as 
above . 



D By pressing D, the value of the Decimal flag is inverted 
as above. 



I By pressing I, the value of the Interrupt flag is 
inverted as above. 



Z By pressing Z, the value of the Zero flag is inverted as 
above . 



C By pressing C, the value of the Carry flag is inverted as 

above . 



The most important function of the simulator is performed by 
pressing the space bar. By pressing the space bar, the 
machine language instruction pointed to by the program 
counter is executed. As the name simulator implies, this 
instruction is not directly executed by the processor. 
Instead it is simulated by the program. The register 
contents and flags are altered just as they would be if the 
microprocessor had executed the instruction. After pressing 
the space bar, the new contents of the registers and flags 
are displayed; the next instruction to be executed is 
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disassembled and displayed; the new value of the program 
counter is displayed. 

Below is an example, simulating the execution of a routine 
contained in the operating system. First set the program 
counter to SA81D by pressing P and entering A81D as the new 
contents of the program counter. The following is displayed: 



PC AC XR YF SR SP NV-BDIZC 

A81D 00 00 00 20 FF 00100000 

A81D 38 SEC 



Press the space bar to simulate the execution of this 
instruction. The result appears below: 



PC AC XR YR SR SP NV-BDIZC 
ABIE 00 00 00 21 FF 00100001 

A81E A5 2B LDA $2B 



After the instruction is executed, the carry flag is set. 
The value of the status register is automatically changed to 
S21. The program counter is incremented by one to 5A81E. 

This location contains an LDA instruction, press the space 
bar to execute this instruction. Here's what you'll see on 
the screen: 
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PC AC XR YR SR SP NV-BDIZC 

A820 01 00 00 21 FF 00010001 

A820 E9 01 SBC #S01 



The accumulator has been loaded with the contents of memory 
location $2B, which contains the value 1, Notice that the N 
and Z flags remain clear because the value loaded was 
neither zero nor negative. The program counter now stands at 
SA820, two bytes further. The instruction at this location 
is SBC #S01 - subtract S01 from the contents of the 
accumulator. Press the space bar again to see the simulated 
results of the SBC instruction: 

PC AC XR YR SR SP NV-BVIZC 

A822 00 00 00 23 FF 00100011 

A822 A4 2C LDY S2C 

After the value $01 is subtracted from the contents of the 
the accumulator (also 1), the result appears in the 
accumulator. Something happened to the flags. The zero flag 
is set, indicating that the result of the operation of is 
zero. The carry flag is also set. This tells us that 
underflow did not occur during the subtraction. The next 
instruction at address SA822 is LDY S2C. Press the space bar 
to get the following display: 



PC AC XR YR SR SP NV-BDIZC 

A824 00 00 08 21 FF 00100001 

AB24 B0 01 BCS SA827 
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The Y-register contains SOS and the zero flag is cleared. 
The instruction at address SA824 is a conditional branch. 
Can you tell beforehand if this branch will be executed? The 
branch will take place if the carry flag is set. Since the 
carry flag is set, the branch will take place. Confirm this 
by pressing the space bar: 



PC AC XR YR SR SP NV-BDIZC 
A827 00 00 08 21 FF 00100001 

A827 85 41 STA S41 



The program counter is now pointing to SA827, not SA826 has 
the carry flag been clear. Notice that the flags are not 
changed by the branch instruction. The next instruction 
stores the contents of the accumulator in memory location 
S41. Press the space bar again: 



PC AC XR YR SR SP NV-BDIZC 
A829 00 00 08 21 FF 00100001 

A829 84 42 STY $42 



The STA instruction does not change any of the flags. The 
next instruction, STY S42, also has no affect an the flags. 
Press the space bar: 



PC AC XR YR SR SP NV-BDIZC 
A82B 00 00 08 21 FF 00100001 

A8 2B 60 RTS 



The next instruction is an RTS. You can stop the simulator 
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here. The great advantage of a simulator is that you can see 
exactly what each instruction does at your own pace. You can 
change the contents of the registers and flags at your 
discretion before the execution of each instruction to see 
how the processor reacts. You can also set the program 
counter back to the same instruction after its execution and 
re-execute it again with different registers or flag values. 
It becomes a great learning tool. 

A simulator also allows you to advance the program counter 
to the next instruction without executing the previous one. 
You can do this by pressing the "cursor down" key. For 
example, if you come to a instruction such as STA or INC 
which overwrites important operating system areas of memory, 
you risk crashing your computer. 

For this reason, instructions affecting memory are normally 
not executed. If these types of instructions are necessary 
to test your program correctly, (for example if your program 
depends on the contents of a specific memory location), then 
you can specify that the program actually execute such 
commands. To do this, press the E key. The prompt ACTUAL 
SIMULATION? Y appears on the screen. If you press <RETURN>, 
then all instructions which write to memory are actually 
executed. If you respond with N(o) instead of Y(es), you can 
turn this option off. 

The simulator also allows you to view and alter the contents 
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of memory location. To do this, press the M key. The prompt 
ADDRESS ?**** appears on the screen. Enter the desired 
memory location and press <RETURN>. The current contents of 
that location are displayed on the screen. You can press 
<RETURN> to leave the contents unaltered, or key in a new 
value to change the contents. Changes are accepted only if 
ACTUAL SIMULATION was previously selected with E. 

The next example describes the operation of the stack. The 
BRK instruction is used to illustrate the stack operation. 
Start the simulator by typing RUN. Enter E to select actual 
simulation mode, and set the program counter to S0002. Next 
change the contents of memory location 30002 to S00. S00 is 
the instruction code for the BRK instruction. Everytime a 
BRK instruction is executed, the simulator's B flag is set. 
The following appears on the screen: 



PC AC XR YR SR SP NV-BDIZC 
0002 00 00 00 20 FF 00100000 

0002 00 BRK 



To better illustrate the stack operations, place unique 
values into the accumulator, X and Y registers. You can do 
this by press the A, X and Y keys and typing in new values 
for the coresponding registers. We have altered the contents 
of the registers to the values displayed on the next page: 
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PC AC XR YR SR SP NV-BDIZC 
0002 22 44 88 20 FF 00100000 

0002 00 BRK 



If there is no BRK instruction at address ?0002, then press 
M and enter the address $0002. The contents of memory 
location 2 appears. Alter the contents to $00 (the operation 
code for the BRK instruction). Now the BRK instruction is 
displayed on the screen as shown above. Press the space bar 
and observe the display: 

PC AC XR YR SR SP NV-BDIZC 

FF48 22 44 88 34 FC 00110100 

FF48 48 PHA 

When a BRK instruction is encountered, the processor takes 
several actions: 



1) The B and I flags are set. 

2) The contents of the program counter (two bytes) and 
the status register are saved onto the stack. 

3) The stack pointer is decremented by three, in this 
case from $FF to $FC. 

4) The program counter is loaded with the contents of 
addresses $FFFE and SFFFF (which contains $FF48). 
SFFEE and SFFFF contain the BRK vector which is the 
address of a routine which always handles a BRK 
interrupt. 



The instruction at this location is PHA, This instruction 
places the contents of the accumulator onto the stack. Press 
the space bar again. You will see this: 
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PC AC XR YR SR SP NV-BDIZC 
FF49 22 44 88 34 FB 00110100 

FF49 8A TXA 



The contents of the accumulator is placed on the stack and 
the stack pointer is automat itca lly decremented. Next the 
contents of the X-register is copied to the accumulator with 
the TXA instruction. Press the space bar again. 



PC AC XR YR SR SP NV-BDIZC 

FF4A 44 44 88 34 FB 00110100 

FF4A 48 PHA 



The flags are not changed because the value in the X- 
register is neither zero nor negative. The PHA instruction 
pushes the contents of the accumulator on the stack again. 
Press the space bar once more. 



PC AC XR YR SR SP NV-BDIZC 
FF4B 44 44 88 34 FA 00110100 

FF4B 9 8 TYA 



Notice that stack pointer is again decremented. Now the 
contents of the Y-register is placed in the accumulator with 
the TYA instruction. This time, however, the N flag is set 
because the value in the Y register is negative (greater 
than S7F). This is displayed: 

PC AC XR YR SR SP NV-BDIZC 

FF4C 88 44 88 B4 FA 10110100 

FF4C 48 PHA 
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The PHA instruction pushes the contents of the accumulator 
onto the stack again. Now here's a new instruction. 



PC AC XR YR SR SP NV-BDIZC 
FF4D 88 44 88 B4 F9 10110100 

FF4D BA TSX 



The TSX instruction transfers the contents of the status 
register to the X-register. 

Notice that you have saved all of the registers onto the 
stack in this order: Program Counter and Status register 
(saved by BRK) , Accumulator, X-register and Y-register. 

Now let's simulate the instructions at a different part of 
the operating system. These instructions restore the 
registers that we just saved so we can further see the 
operation of the stack. 

Before simulating these instructions, set the register 
values to zero. Then you can observe as the values change to 
see how the register contents are restored. You can do this 
by altering the A, X and Y. registers to zero. 

Next set the program counter to SEA81. The display should 
look like this: 

PC AC XR YR SR SP NV-BDIZC 

EA81 00 00 00 B4 F9 10110100 

EA81 68 PLA 
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The machine language routine at SEA81 restores all of the 
registers and continues execution at the point just before 
the BRK interrupt occurred. 

When the PLA instruction is executed, the data at the top of 
the stack is placed into the accumulator. The data is S88, 
which is the original contents of the Y-register above. 



PC AC XR YR SR SP NV-BDIZC 
EA82 88 00 00 B4 FA 10110100 

EA82 A8 TAY 



This instruction copies the value in the accumulator to the 
Y-reg ister: 



PC AC XR YR SR SP NV-BDIZC 
EA83 88 00 88 B4 FA 10110100 

EA8 3 68 PLA 



Now pull the next value from the stack into the accumulator 
with the PLA instruction and transfer it to the X-register. 
Press the space bar to see the results: 



PC AC XR YR SR SP NV-BDIZC 
EA84 44 00 88 34 FB 00110100 

EA84 AA TAX 



Notice that each time a value is taken off the stack, the 
stack pointer is incremented by one. Press the space bar 
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again : 

PC AC XR YR SR SP NV-BDIZC 
EA85 44 44 88 34 FB 00110100 

EA85 68 PLA 

The original contents of the accumulator are now pulled from 
the stack. Press the space bar. The next display looks like 
this: 



PC AC XR YR SR SP NV-BDIZC 

EA86 22 44 88 34 PC 00110100 

EA8 6 40 RTI 



All of the registers have been restored and the stack 
pointer again points to the value to which it pointed after 
the BRK instruction. When using the stack, the important 
thing to keep in mind Is to pull the values off of the stack 

in the reverse order that you pushed them on. The "last in — 
first out" principle characterizes this procedure. 

Now we can execute the RTI instruction which returns us to 
the original interrupted program. 



PC AC XR YR SR SP NV-BDIZC 

0005 22 44 88 20 FF 00010000 

0005 91 B3 STA (SB3) ,Y 



The status register is returned to its original value and 
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the program counter points to the instruction after the BRK 
instruction. 

The simulator is the ideal tool for testing your programs. 
Here you can see, step by step, if the processor really does 
what you had intended. Debugging, always a tricky procedure, 
is much easier with the simulator. Beginners, who are not be 
acquainted with all of the addressing modes or who may have 
problems understanding the flag settings, find the simulator 
especially helpful. The listing of the simulator program 
appears on the next pages. Following the listing is a short 
description of the individual routines and the variables 
used by the program. 
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100 PRINT" CCLR: {WHrXC/DN} *5U> SINGLE-STEP SINULAHJR" 

110 PRINT" " 

120 PRINT" r -r r r « 

130 PRINT" I PC I AC XR YR SR SP INV-BDI2CI" 

110 PRINT" II I l " 

150 PRINT" u J L .J" 

l&O FF=255:HI=256:UL=21 16:SC=2t 15-llSP=FF 

170 DIM MN*<FF> ,OP(FF> ,AD(FF> ,SP(FF) ,H*< 15) 

1B0 F0RJ=0T015:READH* <J) :NEXT 

190 FORJ=OTOFF:READMNr<J) ,DP(J) ,AD<J) ! NEX I 

200 REM DISPLAY REGISTERS 

210 PRINT" {H0ME3 CC/DN3 fC/DNMC/ DNJ CC/DN! tC/DNXC/RI KC/RTXC/RT> CC/R1 3 

IC/RI J "; 

215 IFPC~=ULTHENPC=PC-UL 

220 A=PCiG0SUB229<:>: PRINT "CC/RT! {C/Rl: ": 

230 A=AC:GaSLJEG32urPRINt " ;c/Ri; "; 

240 A=XR: G0SUB2320: PRINT" CC/RTJ"! 

250 A=YR:GQSUB2320: PRINT" tC/RT: "i 

255 G0SUB90C>:REM SR 

260 A=SR:G0SUB2320: PRINT" ;C/RT3 ": 

270 A-SPlGOSUB2320:PRINT"CC/RT>CC/RT3 " ; 

2B0 PRINTCHR*(4B-i-!n : 

290 PRINTCHR*(4B->-V> : 

300 PRINT" 1"; 

310 PRINTCHR* 1 4B + B 1 : 

320 PRINTCHR*<4B+DJ : 

330 PR1NTCMR*(48+I ) ; 

340 PHINTCHR* (48+I> : 

350 PRINTCHR*(48+C> 

3&0 PRINT" CC/DN) CC/DNJ (C/DNJ CC/DNJ (L/DN> tC/LI :.l I 

tC/l M U'/ LFJ CC/LFXC/LF] CC/LF1 (C/LFJ CC/LFJ CC/LFJ CC/LF I tC/LF) X-l I Kl II : 

CC/LFJ CC/LFJ CL/LF > CC/LFJ "s 

400 GETT*: IFT* =" "THEN40O 

405 IF T*»" "THEN1 100:REM SIMULATION 

410 IFT*="P"THENPRINT"PC "; : A=PC: G0SUB2290: INPUT" (CI F '. '. C/ LF ) I I .'IF: 
(C>LF J tL/LF KC/LFJ " ; At: G0SUB2330 I PC=fl 

411 [FT*="H"THEN1000 

420 1FT*="A" THEN ri = "AL": A=AC:GUSUB54": HI -. •."!'! 0200 

430 I FT*=" X "THENT*-" XR" : A=XR:G0SUB540: XR-A: HI ITO2O0 

440 IFT*=' , Y"THENI*="YR": fl«YR«Q0SLIB54<i: YR-f.:lill I I'J-'Oi.' 

450 IFT*=" S"THENT*<="SP" : A=SP: G0SUB540: SP-,,: I .1 1 1 Q200 

4b0 IFTS="N1THENN=1-N:GOT020'. 

470 IFT*="*/^HENV=l-V:GOT020i.> 

480 IFT*="B^HENB=l-B:GOrOXi:'0 

490 IFT*="D"THEND^1-Di GO 10200 

500 IFT*-"I"THENI»l-ItS0T0200 

510 I FT* = " 2" THENZ«1-Zi GDTO2O0 

520 I FT*^ " C " THENO 1 -C : GO I D200 

525 IFT*=" (C/DN! " 1 HENS = P: E=P: PC=P: GOT Lll ■ > 1' ' 

527 IFT*""M"THEN3000 

52B IFT*="E"THEN3100 

530 GOT0400 

540 PRINTTI" »|SQ0SUB2320: INPUT" Si M i:i M :m II ::i It i " ; fi* 

> 60102360 

900 SR=N»128+V*64 + 32+B* 1 i*D*B+ ! *4*2 »'J+C: RE 1 1 IRI I 

910 N=SGN(SRANDi;!B> : V=SQN (SRANIte'i i :-.B»SGN' SRANDlt.) : U BUN(SRflNDB) 

920 I=SGN(SRAND4) : 2=SGN ISRAND2 > lOSRANDl) RE I Ul N 

980 N=SGN<ACAND12B> : Z=1-SGN(«C> : REM FLr.^ 



129 



The Machine Language Book of the Commodore 64 



990 PC-POt+L 
1000 S-PCiE=PC 

J 010 PR I NT "{HOME J CC/DNJ {C/DN3 IC/DN> CC/DN3 CC/DN3 CC/DN] <C/DNJ CC/DN) " 
: BUSUB2040: QO 1 0200 

1100 A=0P<PEEK <PC> ) sL=0: IFA-OTHEN990 

1110 ONAG0TQ12O0, 1210, 1220, 1230, 1240. 1250, 1260, 1270, 1280, 1 1^0, I S 
1 "in, 1 (20, 1330 
1 1 15 A»A-14 

1120 0NAG0TO134O, 17SO, 17-60, 1370, 13B0. 1390, 1400,1410,1420,1430,1440, 
1 430, 146U, 14;o 
1125 A-A-14 

1 130 0NAG0T014GO, 1490,1300, 1510, 1520, 1530, 1540, 1530, 1560, 1570, 15B0, 
!S9<>, lhito, l&l 
1135 A-A-14 

1 140 ONAGOT01620, 1630, 1640, 1 65' ' , 1 660 , lb'". ItSO, 1690. I 700,1710, ' 
! 730, 1 MO, I 30 
1150 GDT0200 

1200 IFDTHEN1205:REM ADC 

1201 G0SUB1900: V^ 1 -SGN ( ACAND1 2B> : AC=AC+0P+C; l- = - Uil I Fl 

1202 AC=ACANDFF:N=SGN(ACAND12H> : V=YANDN: G0TD980 

1205 GOSUB 1900: AC=VAL<H* I AC/ 16) +Hf (ACAND15) > I 0P=VAL (H»(OP/1M 'HI 
(0PAND15) > 

1206 AC«AC+0P+C!C«-(AC"99) : [FAC 99THENAC=AC- 100 

1207 Ar=MID*(STR*<AC> ,2) I GOSUB2390: AC-A:G01 0960 

1210 REM AND 

1211 GOSUB 1 900 : AC- AC AN DOP : GO 1 09B0 

1220 G0SUB190O: A=QP*2:C=-(A>FF ) : A=AANDFFi GOSUB IBS' ' 

1 22 1 I FAD ( PEEK: < PC ) I =4 TKENAC=AC»2 : O- ( AC >FF ) s AC=ACANDFF : BO 1 1 1980 

1223 N-SGN(DPANDFF) : Z=1-SGN(0P) :G0TO99u 

1230 REM BCC 

1240 REM BCS 

1241 FL-C1GOTOI8OO 

1250 REH BED 

1251 FL«ZtG0T01900 

1260 REM BIT 

1261 GOSUB 1900: N=SGNlOPANDl 28 I : V=SGN IOPAND64 ) : i=] -SEN (OPAMDAC) 
l GOT 0990 

1270 REM BMI 

1271 FL=N:GOT01BuO 
12 BO REM BME 

S2B1 FL=1-Z:UQ1D18<X> 
1290 REM BPL 

1300 REM BRK 

1 30 1 PC=PC+2 : I F PC - =UL THENPC=PC-2 

1 302 PH= INT (PC/HI > : PL=PC-PH»H I : SP <SP > =PH:SF-SP-1 ANDFF : SP (sPT=Pl 
:SP=SP-lANDFF 

1 303 B-ll I»l I GOSUB900: SP CSP 1 -BR : SP=SP- 1 ANDFF i PC=P1£EK <65!i34 ) 

♦HI •PEEK (655351 
1304 GOTO 1000 

1310 REM BVC 

1311 FL=1-V:GOT01BOO 

1320 REM BVS 

1321 FL-VlGOTOiaoo 
1730 REM CLC 
1331 C-Ol GOTO 1800 

1340 REM CLD 

1341 D=0:G0T0990 

1350 REM CI. 1 

1351 I=u:G0T099O 

1360 REM CLV 

1361 V=0:60TD990 
1370 REM CMP 



f 

<5P>=F 
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1371 GOSUB 1900: A= AC-OP 

1372 N=SGN(AAND12S> : Z=- <A=0> :C=-<A>=0> : GDI 0990 
13B0 REM CPX 

1381 G0SUB1900: A=XR-0P:G0T01372 

1 590 REM CPV 

1391 GOSUB 19001 A*=YR-0P: GDTD1372 

1400 REM DEC 

1401 GOSUB 1 900 : A=OP- 1 AN DF F : GOSUB 1 SSO 

1402 GOTO I 442 
1110 REM DEX 

1411 XR= (XR-1) ANDFF: GOTO 1452 

1120 REM DEY 

1421 YR=<YR-1> ANDFF:G0T01462 

1430 REM EDR 

1 431 G0SUB19001 A-Oi F0RJ = 71 DOS TF.P-1 : EX-2 t J : A-2*A- ( (CIPANDEX > < > 

CACANDEX) > :ME ■ I 
1432 AC=A:G0T09B0 

1440 REM INC 

1441 GDSLIB 1 900 : A=OP+ 1 ANDFF : GOSUB 1 B50 

1 442 N=SGN ( AfiND 12B) : Z = 1 -SGM ( A ) : GDT0990 
1430 REM I NX 

1451 XR= (XR+1 > ANDFF 

1452 Z=1-SGNIXR) :N=SGN<XF<AND12S> :G0TO99O 

1460 REM IMV 

1461 YR=(YR+1 I ANDFF 

1462 Z=1-SGN(YR) : N=SGN ( YRAND123J : G0T0990 

1470 REM JMP 

1 4 7 1 G0SUB1 900 : PC-AD: GOTO 1 000 
14B0 REM JSR 

1481 A=PC+2:PH=INT(A/HI I iPL=A-PH*Hl :SP < SP) =PH: SP=SP- 1 ANDFF : SP < SP l =PI 

:SP-SP- lAlll'l F 
14B2 PC=PE£K(PC-H)+PEEK<PC-<-2>*Ht :B0TO10O0 
14 90 REM LDA 

1491 GOSUB 1900: AC=OP: G01 0980 
1500 REM LDX 
150! GQSIIB1900: XR=OPs Q0T01452 

1510 REM LDY 

1511 GOSUB)""": , I'-UP: G0T0S462 

1520 REM LSR 

1521 IFAD(PEEMPC) 1 -I1HEN1524 

1522 AC=AC/2 

1323 C=- -(ACOINI (AC)) : AC=ACANDFFs S0TQ98O 

1524 G0SUB1900: A=0P/2:C=-(A INT (A) ) : A=AANDFF : GOSUB 1 B5«.' 

1525 G0T01442 
I 5 50 REM NOP 
1531 BOTO990 

REM ORA 
SS41 GOSUB 1900:,. l oACOROPs G0T09B0 

1550 REM PHA 

1551 SP (SP)=AC:SP=EP-1 ANDFF: GO I 0990 
1560 REM PHP 

: 561 GOSUB9O0 : SP ( SP)=SR: SP=SP-1ANDFF:G01 0990 

1570 REM PLA 

1571 SP=(SP+I) ANDFF sAC-SP(SP) iGOT0980:REM SE I FLAGS 
15B0 REM PLP 

15S1 SF'= iSP+1 ) ANDFF: I R l:-i ) :SQSUB91O:S0TU990 
1590 REM ROL 

1391 I FAD (PEEK (PCi i =4THENAOAC*2+C: hi mil 5.'. ■ 
1592 G0SUB1900: A=QP*2+C:C=- (A FF> 
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1593 A=AANDFF:G0SUB1850 

1594 GOTO 1442 

1600 REM ROR 

1601 IFAD(PEEK(PC) ) =4THENAC=AC/2+12B*C: GOTO! 523 

1602 GOSUB1900:A=OP/2+12B*C:C=-CA<>INT<A) > :G0T01593 

1610 REM RTI 

1611 SP=SP+1ANDFF:SR=SP<SP> : G0BUB910: GOTO 1621 

1620 REM RTS 

1621 SP=SP+1ANDFF: A=SP (SP) : SF-3P+ 1 ANDFF: PC=A+SP (SP> *HI : G0TU990 

1630 IFDTHEN1635: REM SBC 

1631 G0SUB1900:V=SGN(ACAND128)sAC=AC-0P-l+C:C=-<AC>=0> 

1632 AC=ACANDFF:N=SGN(ACAND12B> : V=VAND1-N: GOT0980 

1635 GOSUB1900:AC=VAL(H*<AC/16>+H*<ACAND15> ) : DP=VAL <H* (OP/ 1 6) +H* 
(0PAND15) > 

1636 AC=AC-DP+C-1:C=-(AC>=0) : IFAC<0THENAC=AC+100 

1637 A*=MID*(STRf (AC) , 2> : GUSUB2390; AC=A: G0T09B0 

1640 REM SEC 

1641 C=1:GOT0990 

1650 REM SED 

1651 D=1:GQT0990 

1660 REM SEI 

1661 I=1:GDT0990 

1670 REM STA 

1671 GDSUB1900:A=AC:G0SUB1850 

1672 G0TD990 

1680 REM STX 

1681 GD5UB1 900 :A=XR:GOSUB 1850 

1682 GDT0990 

1690 REM STY 

1691 G0SUB1900: A=YR: G0SUB1850 

1692 GDT0990 

1700 REM TAX 

1701 XR=AC:G0TQ1452 

1710 REM TAY 

1711 YR= AC: GOTO 1462 

1720 REM TSX 

1721 XR=SP: GOTO 1452 

1730 REM TXA 

1731 AC=XR:G0T098u 

1740 REM TXS 

1741 SP=XR:G0T0990 

1750 REM TYA 

1751 AC=YR:GOTQ9S0 

1800 REM BRANCH COMMANDS 

1810 IFFL=0THENL=1:G0TD990 

1820 GOSUB 1985: GOTO 1000 

1850 REM POKE 

1870 IFAD<HI0RAD>HI+FFTHEN1880 

1875 SP (AD-HI )=A: RETURN 

1880 IFESTHENPQKEAD,A 

1BB5 RETURN 

1900 REM GET OPERAND 

1910 AsADIPEEK(PC) ) 

1920 ONAG0SUB193O, 1935, 1940,1945, 1950,1955,1960,1965,1970,1975, 

1 9B0 , 1 985 , 1 990 
1 925 IFAD'-; H I OR AD ) H I +FFTHENRETURN 
1927 OP=SP (AD-HI ): RETURN 
1930 AD=0: RETURN: REM IMPLIED 
1935 AD=PC+1:0P=PEEK(AD) : L=l : RE TURN: REM # 
1940 AD=PEEK(PC+1) : OP=PEEK < AD) : L=l : RETURN: REM ZERO-PAGE 
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1945 AD-O: RETURN: REM A 

1950 AD=PEEK(PC+1 > +H3 *PEEK (PC+2) :0P=PEEK(AD> :L=2: RETURN 

1955 AD"PEEK(PC+1 > +XRANDFF: DF-PEEK < AD) :L=l:RErURN 

1 960 AD=PEEK ( PC+ 1 > +YRANDFF : DP=P£EK ( AD ) : L= 1 : RE 1 URN 

1965 AD=PEEK<PC+1 > +HI *PEEK < PC+2) + XR: DP=PEEK (AD) : L=2: RETURN 

1970 AD=PEEK (PC+1 ) -t-Hl *PEEK (PC+2) +YR: DP=PEEK (AD) : L-2s RE I URN 

1975 AD=PEEK( PEEK (PC+1) V+HI»PEEK (PEEK (PC+1 ) +1 ANDFF ) +YR: OP-PEEK (AD) 

: I =>1 : RETI IRN 
1 980 AD=PEEK ( PC+ 1 > +XRANDFF : AD-PEEK < AD > +H 1 *PEEK ( AD+ 1 ) : OP-PEEK ( AD ) 

:! =1: RE [URN 

1985 A=PEEK(PC+1) iA=ft+HI*(A: 127J+2+PC 

1986 I'C=1NI <A/Hl)*HI+< <A+(A>SC)*UL)ANDFF>:RETURN:REM RELATIVE 
1990 AD=PEEK(F'C+l)+HI*PEEK(PC+2) ; AD=PEEK < AD) +HI*PEEK < AD+1 ) :QP=PEEK 

(AD) : RE I URN 
'2040 F0RP=ST0E:PRINT" "j 
2050 A=P:G0SUB2290:REM ADDRESS 

2060 PRINT" "| !A»PEEK(P) : G0SUB2320: PR I N I " " : : J =PEEK (P) ! 0P=AD ( J ) 
2070 0N0PG0SUB2350 , 2360 , 2360 , 2350 , 2370 , 2360 , 2360 , 2370 , 23 70 , 2360 , 2 S60 , 

2360 . 2370 
20B0 PRINT" ";MN*(J) M "; 
2090 DNOPG0SUB2 11 0,2 120, 21 30, 21 40, 2 150, 2 160, 2 170, 21 80, 21 90,2200,2210, 

'>'. 2240 
2100 PRINT" "sNEXTP 

21 05 IFP>=ULTHENP=P-UI 
2110 RETURN 

2120 PRIN1 "#"; :GQSLIB233G:P=P+1:RETURN 
2130 S0SUB2330: P=P+1 : RETURN 
2140 PRINt " A": : RETURN 
2150 80SUB2260:F=P+2: RETURN 
2160 GOSU82330:P=P+1: PRINT" , X " ; : RETURN 
21 70 GUSUB2330:P=P+2: PRINT" ,Y"; : RETURN 
21 HO BOSUB2260:P=P+2: PRINT" ,X"j s RETURN 
2190 S0SIJB2260:P=P+2: PRINT", Y"; : RETURN 

200 PRINT" (": : G0SUB2330: P=P+1 : PRINT") ,V"; : RET URN 
2210 PRINT" <"; : GDSUB2330: P=P+1 : PRINT" , X) "; : RETURN 
2220 A=PEEK(P+1) ; A=A+HI* ( AM 27 ) +2+P 
2230 A= INT (A/HI )*HI+( ( A+ < A>SC> *UL > ANDFF) : PRINT"*"; : G0SUB229O 

sP=P+l :RE I URN 
2240 PRINT" ("; : G0SUB2260 
2250 PRINT" ) " ; : P=P+2: RETURN 
2260 PRINT"*": 

2270 A=PEEK(P+1 ) +HI*PEEK (P+2) 
2230 REN HEX ADDRESS A 
2290 HB=INT(A/HI) :A=A-HI*HB 
2300 PRINrH*(HB/16)H$(HBAND15) ; 
2310 REM HEX BYTE A 

2320 PRINTH*(A/lfa)H*(AAND15> ; : RET URN 
2330 PRINT"*"; 
2340 A=PEEK (P+l ) : GDTD2320 
2350 PRINT" ";:RETURN 
2360 B0SUB234O! PRINT" ";: RETURN 
2370 G0SUB2340 SPRINT" "; : A=PEEK (P+2) :60TQ2320 
23B0 IFASC(A*)=42THEMEND 

2390 A=0:F0RJ = 1TDLEN(A*) : X=ASC (RIGHT* < A* , J > >-4B: X=X+(X>9)*7l A=A+X* 
(161 (J- I ) > :NEXT 

2391 RETURN 

.3000 PR INT: PR INT" {C/DNJtC/DN}": PR INT" ADDRESS: ##*#«<C/LF> tC/LFJ 

{C/LFJ CC/I.F3 LC/LFJCC/LF>"S : INPUTA*: GOSUB2380 ..,„,„-„ P „ „ r-, 

3010 PRINT" CC/UP}", , : AD=A : 0P=PEEK < AD i -. A=DP : GOSUB2320 : INPUT .L/LI-, 

CC/1 F I IC/I Fl IC/LF3 ";A*:G0SUB2380 „ tPaD=aPC 

3020 GDSUB1850:PRSNT"-TC/UP3- ,uh 

tHENlOOO 
3030 B0TO2OO r-c-cct-- •■ V " 

3100 INPUT" ACTUAL SIMULATION Y CC/LF3- CC/LF3 CC/ LF>" ! ES*: ES-ES*- Y 
3110 PRINT" -CC/UPT "tQDr0200 
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1 0000 
10010 
1 0020 
1 0030 
1 0040 
1 0050 
10060 
10070 
10080 
10090 
10100 
101 10 
1 I 20 
10130 
10140 

I 1 50 
10160 
10170 
10180 
10190 
10200 
H>21" 

I I p.; .J. i 
10230 
10240 
1 02S0 
10260 
S0270 
!■>. in: 

1 0290 
10300 

1 :• 1 

10320 

I 0330 

10340 

10350 

10360 

10370 

103B0 

10390 

1 04OO 

10410 

10421 

l 04 31 ■ 

1 044' i 

104 50 

10460 

10471.1 

1 0480 

10490 
I 0500 

tosio 

I US20 
L0530 
1, ,540 
1 0550 
10560 
10570 



DATA 

DATA" 

DATA" 

RATA" 

DATA" 

DATA" 

DATA" 

DATA" 

DATA" 

DATA' 

DATA' 

DATA' 

DATA' 

DATA 1 

DATA' 

DATA' 

DATA' 

DATA' 

DATA' 

DATA 1 

DATA' 

DATA' 

DATA' 

DA1A' 

DATA' 

DATA' 

DATA' 

DATA' 

DATA' 

DATA' 

DATA' 

DATA 1 

DATA' 

DATA 1 

DATA' 

DATA' 

DATA' 

DATA' 

DATA' 

DATA' 

DATA' 

DATA' 

DATA' 

DATA' 

DATA' 

DATA' 

DATA' 

DATA' 

DATA' 

DATA' 

DATA' 

DATA 1 

DAI A' 

DATA' 

DATA' 

DAI '■' 

DATA' 

, ■. , I -,■ 



0,1, 
BRK" 

777 

ASL" 
OR A" 



DRA'- 
CLC 

ASL' 
AND' 

BIT' 

.. . . 

ROL' 
AND' 
Bl'll' 

RDL' 
AND' 

■ ■ " 
i . . , 

77?' 

UN 1 
PHA' 
???' 
LSR' 
EDR' 

■ 

EUR' 
RTS 1 

ROR' 

ADC 
JMP' 

-..,■,, 

ADC 
5EI' 

ROR' 
SI A' 
STY' 

t :■: A ' 

5 I.,- 

BCD' 

■ . - i 

s r k • 

STA' 



I [■' • 

I DA' 

TAV 



2,3,4,5,fa,7,B,9,A,B,C,D 

,11,1 ,"0RA",35, 11. .">",■. 

,0,1 ,"???", 0,1 , "ORA" ,35, j 
,3, 3, "???" ,0,1 , "PHP", 37, 1 
, S3, 2, "ASL", 3, 4, "???■' ,0,1 
,0,1, "ORA" ,35,5, "ASL" ,3,5 
,0,1 , "BPL" ,10, 12, "ORA", 35 
,0, 1 ,"???" ,0, 1 , "???" ,0, 1 
,35,6, "ASL" ,3,6, "???" ,0,1 
,14,1, "ORA" ,35,9, "?'.'?", O, 




,9, "???", 0, 1 , "???" ,0,1 
, 1 , "AND", 2, 9, "RDL", 40, B 
i, 1 ,"BTI" ,42, 1 ,"EQfi",24, 11 
,..', 1 ,"???" ,0,1, "77?" ,0, 1 
. .1 . .. "LSR" ,33,3,"???" ,0, 1 
,36, 1 ,"EOR" ,24,2, "LSR" ,33,4 
. 0, 1 . "JMP",28,5,"E0R" ,24 ,5 
, 33,5, "???" ,0, 1 , "BVC" , 12, 12 



E,F 
0,1 



1 10 



1 , ' , ■ ■ ■ 
■:'. l , "DRA" ,35,8 
0, 1 ,"JSR" ,29,5 
,0,1," 77? ",0,1 
7-3- "ROL" ,40,3 



28,5,"E0R" ,24 ,5 
,0, 1 , "BVC" , 12, 12 
",0,1 ,"???" ,0, 1 
0, 1 ,"EOR" .24,6, "LSP" ,33,6 
0,1 ,"CLI", 16,1 , "EDR", 24, 9 
O, 1 ,••???", 0, I, "???", 0, 1 
24, S, "LSR" ,33, 8, "???", 0,1 
43, 1 , "ADC\1 ,11 ,"???" .0, 1 
0,1 ,"??-"' .0,1. "ADC", ! ,3 



", 1,11, "???", 0,1 
,0,1, "ADC", ! ,3 
■t '".>:>, 1 , "PLA",3B, 1 
ROR" ,'li ,4,"???" ,'), 1 
'ADC" , 1,5, "ROR", 41, 5 
, 1 , "BVS" , 13, 12, "ADC", 1 . I'l 

1 , " '" ■" ,", 1 , " ,0, 1 

6, "ROR", 41, 6," 



4 1.; 

L'B , 1 3 

I 

I 



1 ,<b, "ROR", 41 ,6, "■'•■ " 
47, 1 ,"ADC" , 1 ,9,"???" ,0, 1 
". I . '•???•• ,.., , 1 , "ADC",1,B 
4 1,8, •" , ~ > "' ,0, 1 , "77?" . ". 1 
4H, 1 1 , "77 '" ,0, I , ",0, I 



41 
4H 

iO 
". 1 
54 , 

I 

4,12 
0, 1 , 
*9,7 
4B,9, 
", 1 . 
0,1 
■ 

50 
52, 1 , 



i , - , '-', i , , . 1 

, "STA" ,48,3, "SO" ,49,3 
"DEY" ,23,1, ,0,1 

,"-■--." ,.'!, J . "S I " 

i, "STX" ,49,3," '■ '■'■" 



"STA" ,48, 10. 



1 '■-■•' ,i), 1 



1 ,48, 10," '■''" ,".1 
ffn " ,".".;.. "STA", 48, 6 
,0,1, "1 ■ ■•" ,56,1 
, "TXS",55,1 ,"???'*, 0, I 

"STA", 48, 8, , ■'. 1 

. 1 . "LDV " . 32,2, "I DA" ,30,11 

i . - .'■, 1 , "1 DV " ,32,3 

0,3,"U}X",31,3, ,0,1 

2, 1, "LDA",30..:, " rAX" ,51 - I 
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10580 


DATA 


' -1-1-7 " 


0,1, 


LDY" 


32,5, "LDA" 


, 30 , 5 


10590 


DATA 


'LDX" 


31 ,5 


11 ->->-> 

■ ■ 


,0,1, "BCS" 


,5,12 


10600 


DATA 


'LDA" 


30, 10, "???", 0,1, "777 


" ,0,1 


10610 


DATA 


'LDY" 


32,6 


"LDA 


,30,6, "LDX 


",31 ,7 


1 0620 


DATA 


'7??» 


0,1, 


CLV" 


17,1, "LDA" 


, 30 , 9 


10630 


DATA 


TSX" 


53,1 


11 777 


,0,1, "LDY" 


, :-.',ii 


1 0640 


DATA 


'LDA" 


30 , 8 


"LDX 


,31,9, "'->-•'■ 


" ,0,1 


10650 


DATA 


'CPV* 


20 . . 


"CMP 


,18, 11, "77 


7", 0,1 


1O660 


DATA 


i?Tl» 


, 1 , 


CPY" 


20,3, "CMP" 


, IS, 3 


1 0670 


DATA 


•DEC" 


21 ,3 


"77? 


,0,1, "INY" 


,27,1 


1 06B0 


DATA 


'CMP" 


18,2 


"DEX 


,22, 1 ,"-n? 


" ,0,1 


10690 


DATA 


'CPY" 


20 , 5 


"CMP 


, 18, 5, "DEC 


",21 ,5 


10700 


DATA 


•y*y - ii 


0,1, 


BNE" 


9, 12, "CMP" 


, 18, 10 


10710 


DATA 


'777" 


0,1, 


-,">iii 

- 


0, i, ■•???", 


CI, 1 


10720 


Di i i -. 


■CMP" 


IS, 6 


" DEC 


, 21 ,6, "777 


",0.1 


10730 


DATA 


CLD" 


15, I 


"CMP 


,18,9, "77? 


",0,1 


10740 


DATA 


1717 ii 


0,1, 


T7 r J" 


0,1, "CMP", 


18,8 


10750 


DATA 


DEC" 


21, a 


1. -,-1-1 


,0, 1 , "CPX" 


,19,2 


10760 


DA ' i- 


SBC" 


44,1 


"??? 


,0,1, "???" 


,0,1 


10770 


DATA 


CPX" 


19,3 


"SBC 


,44,3, "INC 


' , 25 . 3 


10780 


DATA 


777 " 


0,1,' 


1 rix ■ 


26, 1 , "SBC" 


,44,2 


10790 


DATA 


NIIP" 


34,1 


H -i-?^i 


.0, 1,"CPX" 


,19,5 


10800 


DATA 


SBC" 


44,5 


"INC 


,23,5, "V-'- 1 


',0.1 


10B10 


DATA 


BED" 


6,12 


"SBC 


,44,10, "7? 


"'" ,0, 1 


1 0320 


DATA 


, '?'?7 » 


0,1, 


77711 


0, 1 ,"SBC" , 




1 0S3O 


DATA' 


INC" 


25,6 


'"yv? 1 


,0, 1,"SED" 


,46, 1 


10840 


DATA 


SBC" 


44,9 


"77? 1 


,0,1, »???•' 


,0,1 


1 08SO 


DATA' 


-7-th. 


0,1,' 


SBC" 


44,8, "INC" 


,25,8 


10860 


DATA" 


■}*}-, 11 


O, 1 
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Program description for the single-step simulator 

100 - 190 Build the register display, initialize variables 
and fields, 

200 - 360 Display the register contents. The contents of 
the registers are displayed in hexadecimal. The 
flags are displayed using the CHRS function by 
adding the value of the flag (0 or 1) to 48. 

400 - 530 The keys are tested. If the space bar is 
pressed, execution passes to the simulator 
routine at line 1100. The register commands 
result in branches to input routines which 
display the old value and wait for the input of 
the new value. For the flags, the state is 
simply reversed. If the "cursor down" key is 
pressed, the disassembler routine is called and 
the next instruction is displayed. 

900 - 920 Calculate the value of the status register SR 
based on the individual flags. 

980 Set N and 2 flags. 

990 Increment program counter. 

1000 - 1010 Disassemble the next instruction. 

1100 - 1150 Perform single-step simulation. The appropriate 
routine is called depending on the operation 
code . 

1200 - 1751 Simulate routine for all 6510 commands. The 
routines are alphabetically ordered by mnemonic. 
The prqogram counter is incremented according to 
the length of the instruction in line 990. The N 
and Z flags are set according to the value in 
the accumulator by a jump to line 980. 

1800 - 1820 All branch commands are handled here, after the 
corresponding flag value is placed in the 
variable FL. 

1850 - 1885 This routine is used to write values in memory. 
The stack area from $100 to S1FF is handled 
differently. The POKES are executed only if 
actual simulation is desired (variable ES). 

1900 - 1990 Get the operands for the commands based on the 
addressing mode. After calling this routine, the 
address of the operand is in AD, the value 
itself in OP. 
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2040 - 2370 Disassembles then next instruction after each 
single step. The operand is displayed according 
to the addressing mode in line 2070. If the 
memory location does not contain a legal 
instruction code, three question marks are 
displayed instead. The following routines carry 
out the addressed task as well as the conversion 
from decimal to hex. 

3000 - 3030 Displays and changes the memory contents. The 
changes are allowed only if the actual 
simulation is selected, 

3100 Select the actual simulation parameters. 

10000-10860 Contain the instruction mnemonics, operation 
codes and addressing modes. 
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Descriptions of the important variables. 

FF constant 255 

HI constant 255 

UL constant 65536 

SC constant 32767 

MN$(255) table of 6510 mnemonics 

OP(255) table with the corresponding operation codes for 
the single-step simulation 

AD(255) table with the addressing mode for each 
instruction. 

SP(255) the simulator stack 

H${15) field with hex digits 

PC program counter 

AC accumulator 

XR X register 

YR Y register 

SR status register 

SP stack pointer 

N negative flag 

V overflow flag 

B break flag 

D decimal flag 

I interrupt flag 

Z zero flag 

C carry flag 

T$ pressed key 

L length of operands 

ES flag for actual simulation 

OP operand 
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7. Machine Language Programming on the Commodore 64 

Machine language is particularly well-suited for programming 
high resolution graphics on the Commodore 64. In this 
section. We begin by programming graphics in BASIC and then 
converting the corresponding routines to machine language. 
By doing this, you will become well acquainted with many 
machine language programming techniques. 

Graphics programming can be done in BASIC only with a 
confusing set of PEEKS and POKESs. By writing a few machine 
language routines we can greatly simplify these graphics. 
You will learn how to combine machine language programs with 
BASIC programs, thereby taking advantage of the strong 
points of both languages. 

The programming details of the video-controller kernal 
routines are discussed only as much as necessary to solve 
our problem. If you want to get a closer look at the 
hardware and operating system of the Commodore 64, we 
recommend the book The Anatomy of the Commodore 64 available 
from ABACUS Software. 

Before you turn to the first example, take a look at how you 
can use machine language programs from BASIC and how how to 
pass parameters between the two programs. 

The normal way to call a machine language program from BASIC 
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is to use the SYS command to specify the memory location 
where execution is to begin, SYS assumes that the machine 
language program is already in memory and then passing 
control to it. When the machine language program executes an 
RTS instruction (return from subroutine), execution returns 
to the BASIC statement following the SYS command. 

Some machine language routines require no parameters to be 
passed to it. A routine for clearing the screen, fcr 
example, does not require any parameters. 

Other routines require parameters. A routine for plotting a 
point requires an X and y coordinate, for example. 

How can you pass parameters to machine language routines? 

There are several different techniques for passing 
parameters : 

a. Using the pigeon-hole method, you can place 
the parameters in one or more memory locations 
previously agreed upon. For our example, one 
memory location contains the horizontal 
coordinate and another memory location the 
vertical coordinate. You can do this from 
BASIC with two POKE commands. The machine 
language program can then get the values of 
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the coordinates from the memory locations and 
process them. 

Using the register pass area method, you can 
pass values between the BASIC program and the 
machine language program. When a SYS command 
is executed by BASIC, it is possible to 
transfer specific values through the 
registers. Because we cannot access the 
processor registers directly from BASIC, four 
memory locations are reserved for this 
purpose. When the SYS instruction is executed, 
the contents of the following memory locations 
are copied into the registers before the 
branch to the routine is made. 



780 => accumulator 

781 => X register 

782 => Y register 

783 => status register 



To start a machine language routine with a 
specific value in the accumulator, you would 
POKE location 780 with the desired value. 
Addresses 781 and 782 pertain to the X and Y 
registers. Caution must be exercised in 
assigning a value to the status register. Take 
care not to unintentionally set the decimal or 
interrupt flag since this can lead to 
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compl ications. 

After the machine language routine is 
finished, the contents of these registers are 
saved in these same memory locations. So the 
machine language routine can pass information 
back to the BASIC program using the same 
technique. To retrieve a value, the BASIC 
program merely PEEKS the desired register pass 
area. Using this method, it is possible to 
transfer three or possibly four 8-bit values 
between the BASIC and machine language 
programs. This should suffice for most 
applications. If more parameters must be 
transferred, you must establish memory 
locations as described above. 

c. Using the BASIC interpreter formula evaluation 
routine, you can pass an almost unlimited 
number of parameters to the machine language 
routine. For example, when the interpreter 
encounters an instruction such as POKE 180,10, 
it uses a built-in POM routine to evaluate the 
parameters following the POKE keyword. This 
routine evaluates not only constants, but 
complicated expressions as well, such as POKE 
A+7.5*ZUINT( SI N(X) * 1000) ) ,EXP(X) . You can 
call this ROM routine from your own machine 
langauge program. Later you will see how to 
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use these routines. For now, use the register 
pass area to transfer parameters directly via 
the registers. 

Before discussing graphics programming, you should be 
acquainted with a few principles. 

The distinguishing characteristic of high resolution 
graphics is that you can access each individual pixel on. the 
screen. This is unlike the normal text mode, where you can 
access only complete characters (8X8 pixels). For normal 
text there are 25 * 40 characters at your disposal; with 
high resolution graphics there are eight times as many in 
each direction, 200 * 320 points. 

In normal text mode, each character requires one byte in 
video RAH. Each screen location can display any of 256 
different characters. Normal text mode requires 25 * 40 * 1 
= 1000 bytes of memory called video RAH. Video RAM is 
located beginning at address 1024 thru 2023 ($400 to S7E8). 
This starting address of the video RAM can be changed in 
steps of 1 Kbyte (S400, S800, SC000, S1000, etc.) by 
programming the video controller. 

In high resolution graphics mode, each point requires one 
bit. Each pixel can be either on or off. High resolution 
graphics requires 200 * 320 * 1 bit = 64000 bits = 8000 
bytes of memory. Memory used in this way is often called the 
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bit-mapped area. The starting address of the bit-mapped area 
is specified by programming the video controller in the 
Commodore 64. 

Before programming the video controller, you have to first 
decide where the 8K bit-mapped area is to be located. At 
first, you may be tempted to use BK storage from the area 
that BASIC normally uses. But since you are programming in 
machine language you have other alternatives. The Commodore 
64 has a full 64K of RAM, in addition to the ROWS, input and 
output devices and character ROMS. You can use the ram that 
lies "underneath" {in the same address range) the BASIC and 
kernal ROM. This area is located beginning at address SE000 
to SFFFF. Normally you cannot use this area from BASIC 
because you must first turn off the BASIC interpreter and 
operating system when accessing these locations. 

The video RAM normally used for the text screen is used as 
color memory when using high resolution graphics. Since the 
video RAM and bit-mapped areas must be located within the 
same 16K range (SCOOO - SFFFFi, you can use the from SCOOO 
to SC3FF for color memory. Since there is only IK of video 
RAM available for use as color memory, each byte of video 
RAM determines the color of the 64 pixels within the field 
of an 8x8 cells. 

Now we present several routines which you can use for 
programming in high resolution graphics. 
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The first routine changes the Commodore 64 from text mode to 
high resolution graphics mode. By using the area hemeath the 
ROMS for the bit-mapped graphics area, the normal text 
screen contents are not destroyed. The contents is preserved 
when we switch from one mode to another. Here's the program 
in pseudo-BASIC. Of course this BASIC program does not run 
since we cannot use hexadecimal numbers as constants. 



100 V = 53428 : REM VIDFO CONTROLLER START ADDRESS 
110 VI = V+17 : REM GRAPHICS-MODE SWITCH ADDRESS 
120 V2 = V+24 : REM VIDEO RAM ADDRESS 
130 CIA = SDD00 : REM 16K RANGE 
140 POKE VI ,59 
150 POKE V2,8 
160 POKE CIA,0 
170 END 



To convert this to machine language, first decide where the 
machine language program is to be stored. Since the area 
from $C000 to SC400 is used as color memory, use the area 
beginning at SC400 for the program. The conversions of these 
commands to machine language is straight-forward. Remember 
to RUN the short program UNTOKEN before creating the 
following assembler source program. 



100 VIDEO = 53248 ; VIDEO CONTROLLER 

110 VI = 53625 : ADDRESS FOR GRAPHICS MODE 

120 V2 = 53272 ; ADDRESS FOR VIDEO RAM ADDRESS 

130 CIA = SDD00 ; 16K SELECTION 

140 *= SC400 ; START OF OUR ROUTINE 

150 LDA #59 

160 STA VI 

17 LDA #8 

180 STA V2 

190 LDA #0 

200 STA CIA 

210 RTS 

220 .EN 
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Assembling the above program, gives you this listing: 



D000 








100 


VIDFO 


= 


53248 


Will 








110 


VI 


= 


53265 


DO 18 








120 


V2 


= 


53272 


DDOO 








130 
140 


CIA 


* = 


SDDOO 
SC400 


C400 


A9 


JB 




150 


ON 


LDA 


#59 


C402 


Bl 


n 


DO 


160 




STA 


VI 


C405 


.-..i 


OH 




170 




LDA 


18 


C407 


BE 


18 


DO 


180 




STA 


V2 


C40A 


A9 


on 




190 




LDA 


#0 


C40C 


BE 





or 


200 




STA 


CIA 


C40F 


60 






210 
220 




RTS 
.EN 





Now let's write a routine which switches the Commodore 64 
back to normal text mode. You do this by loading the video 
controller registers with their original values. For the 
sake of simplicity, append this routine to the previous one. 



100 VIDEO = 53248 ; VIDEO CONTROLLER 

110 VI = 53625 : ADDRESS FOR GRAPHICS MODE 

120 V2 = 53272 ; ADDRESS FOR VIDEO RAM ADDRESS 

130 CIA = SDDOO ; lfiK SELECTION 

140 *= SC400 ; START OF OUR ROUTINE 

150 ON LDA #59 

160 STA VI 

170 LDA #8 

180 STA V2 

190 LDA #0 

200 STA CIA 

210 RTS 

220 r TURN OFF 

230 OFF LDA #27 

24 LDA VI 

250 LDA #21 

260 STA V2 

270 LDA #3 

280 STA CIA 

290 RTS 

300 .EN 



After assembling this program, you should display the symbol 
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table. The symbols ON and OFF have been defined, even though 
they are not referred to in the program? we have done this 
because these addresses are used later for the calls via the 
SYS instruction. 

DOOO 100 VIDEO = 53248 



DO 11 








110 


VI 


= 


53265 




D018 








120 


V2 


= 


53272 




DDOO 








13Q 
140 


CIA 


* ■-. 


SDDOO 
SC400 




C400 


M 


3B 




150 


ON 


LDA 


#59 




C40 2 


BD 


] 1 


DO 


160 




STA 


VI 




C405 


A9 


OH 




170 




LDA 


f£ 




C407 


BD 


18 


DO 


180 




STA 


V2 




C40A 


A9 







190 




LDA 


#0 




C40C 


8D 


00 


DD 


200 




STA 


CIA 




C40F 


en 






210 




RTS 






C410 








220 






; TURN OFF 


C410 


A 9 


in 




230 


OFF 


LDA 


#27 




C412 


B D 


1 1 


DO 


240 




STA 


VI 




C415 


A9 


L5 




250 




LDA 


#21 




C417 


BD 


18 


DO 


260 




STA 


V2 




C41A 


A 9 


D3 




270 




LDA 


43 




C41C 


BD 


00 


DD 


280 




STA 


CIA 




C41F 


6 






290 
300 




RTS 
.EN 







C400 / C420 / 0020 
SOURCE FILE IS EXAMPLE. SRC 
ERRORS 



OFF 


C410 


CIA 


DDOO 


ON 


C400 


VIDEO 


DOOO 


VI 


DO 11 


VJ 


D01S 



Before you test these routines, convert the starting 
addresses ON and OFF into decimal: SC400 is equal to 50176, 
SC410 is equal to 50192. You can test the routines by using 
a short BASIC program: 



100 SYS 50176 : REM GRAPHICS ON 
110 GET AS : IF AS="" THEN 110 
120 SYS 50192 : REM GRAPHICS OFF 
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This program switches to the high resolution graphics mode, 
waits for a key press and then switches back to the normal 
text mode- Try it! 

When you RUN the program, a mixture of colored squares 
appears on the screen. What you see are the random values 
that the unused RAH area contains after the computer is 
turned on. If you press a key, you return to the normal 
text screen mode. 

The next task is to clear the high-resolution graphic screen 
and color memory, in BASIC you can perform this by using a 
loop to POKE the bit-mapped graphics area. 

To erase all the points in the bit-mapped graphics area, 
each bit must be set zero. Therefore each byte of the bit- 
mapped area is also set to zero. The loop must clear the 
area beginning at address SEOOO through SFFFF (actually to 
SFF3F because only 8000 and not 8192 bytes are used). 

FOR I = 53744 TO 65535 : POKE 1,(1 ! NEXT 

You can do this with a BASIC program, but it takes about 30 
seconds to execute. In machine language the whole thing 
takes place much faster. 

Earlier we write a machine language program to display the 
Commodore 64's character set on the screen. We used an index 
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register to control the program loop. This next loo{ , 
requires a range beyond the 256 maximum range of the X and Y 
index registers. Since you must clear 8000 bytes (length of 
the bit-mapped area) you can do this with two nested loops. 
In BASIC it might look like this: 



100 AD = 57344 

110 FOR X = TO 31 

120 FOR Y = TO 255 

130 POKE AD+Y, 

140 NEXT Y 

150 AD = AD+256 

160 NEXT X 



Here we divided the range of 8192 bytes into 32 parts (or 
"pages") of 256 bytes each. During each pass through the 
loop 256 bytes are cleared. Then the base address (AD) is 
incremented by 256 and the next 256 bytes are cleared. The 
occurs a total of 32 times, as controlled by the variable X. 
As an "freebie" we also cleared an extra 192 bytes in the 
last page (bytes 8001 through 8192). Since these 192 bytes 
are unused, this won't cause us any problems. Now convert 
the BASIC program to machine language: 



100 AD = SE00O 

110 LDA #0 ; ERASE ACC 

120 LDX #0 

130 LDY #0 

140 STA AD,Y 

150 INY 

160 BNE SYMB1 

170 ; AD = AD + £100 

180 INX 

190 ; IS X = 31? 

200 ,- NO, THEN BACK TO LINE 130 

210 .EN 
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Some missing pieces from the above program. Can you 
correctly place the label SYMB1? It should be placed at line 
140. Variable AD is not yet incremented. Use the indirect 
indexed addressing mode for this. Using this technique, the 
actual address is obtained from the sum of the two-byte 
pointer in page zero and the Y-register. Later you can 
increment this pointer by $100, as called for in line 170. 
The indexed addressing mode used in line 140 above can 
access a range of only 256 bytes, but the indirect indexed 
addressing technique overcomes this limitation. The test of 
the X-register for 31 in line 190 and the branch back in 
line 200 are stra ight- forward. Here's the changes to the 
above program: 



100 AD = SE000 

110 LDA #0 : ERASE ACC 

120 LDX ttO 

130 SYMB2 LDY #0 

140 SYMB1 STA (AD) , Y 

150 INY 

160 BNE SYMB1 

170 ; AD = AD + 3100 

180 I NX 

190 CPX #32 

200 BNE SYMB2 

210 .EN 



Using indirect indexed addressing, address AD must be a two- 
byte pointer located in page zero, not an a'bsolute address 
as before. You can use the memory locations SFA and SFB for 
this pointer. This pointer is loaded with the value SE000 at 
the beginning of the routine - the low-byte (S00) in SFA and 
the high-byte ($E0) in SFB. Now add an RTS instruction to 
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the end of the routine, and the final program looks like 
this: 



90 *= SC420 
100 LDA #<SE000 
102 STA SFA 
104 LDA #>$E000 
106 STA SFB 

110 LDA #0 ; ERASE ACC 
120 LDX #31 
130 SYMB2 LDY #0 
140 SYMB1 STA (AD) ,Y 
150 INY 
160 BNE SYMB1 
170 INC SFB 
180 INX 
190 CPX #32 
200 BNE SYHB2 
205 RTS 
210 .EN 



This routine is assembled beginning at SC420. Save the 
source program to disk and then assemble it. 



00FA 








90 


AD 


- 


SFA 


O0FB 








95 


AD1 


= 


SFB 


C420 








97 




* ~ 


SC420 


C420 


A" 


00 




100 




LDA 


#<$E000 


C4 2 2 


an 


FA 


00 


102 




STA 


AD 


C425 


ft9 


B0 




104 




LDA 


#>SE000 


C427 


BD 


KB 


00 


106 




STA 


AD1 


C4 2A 


A9 


on 




110 




LDA 


#0 


C4 2C 


K2 


00 




120 




LDX 


#31 


C4 2E 


Ml 


00 




130 


SYMB2 


LDY 


#0 


C430 


91 






140 


SYMBl 


STA 


(AD) ,Y 


C432 


C8 






150 




i >; y 




C433 


DO 


H- 




160 




BNE 


SYMB1 


C435 


EE 


FB 


00 


170 




INC 


AD1 


C438 


E8 






180 




INX 




C439 


B0 


20 




190 




CPX 


#32 


C43B 


DO 


F] 




200 




BNE 


SYMB2 


C43D 


6 






205 
210 




RTS 
• EN 
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C420 / C43E / 001E 
SOURCE FILE IS EXAMPLE 2. SRC 
ERRORS 



AD OOFA ADl OOFB SYMB1 C430 SYMB2 C42E 

Now that the above program works, can you write a program 
that presents a more elegant solution? First, you can use 
zero-page addressing for the two addresses AD and ADl. This 
is done by using an asterisk before each of the labels. You 
can also remove the instruction for loading the accumulator 
with zero in line 110 as this already occurs in line 100; 
but you must first reverse the order of the assignments in 
lines 100 to 102 and 104 to 106. If you let the X loop vary 
from 32 to 0, you can eliminate the comparison in line 190. 
These improvements enable the program a bit shorter. Here's 
the new listing: 



OOFA 






90 


AD 


= 


SFA 


OOFB 






95 


ADl 


= 


SFB 


C420 






97 




A ^ 


SC420 


C4 20 


A9 


B0 


100 




LDA 


#>SE000 


C422 


85 


i : ; 


102 




STA 


*AD1 


C424 


A9 


00 


104 




LDA 


#<5E000 


C426 


85 


FA 


106 




STA 


*AD 


C428 


A2 


20 


110 




LDX 


#32 


C42A 


A8 




120 


SYMB2 


TAY 




C42B 


91 


FA 


130 


SYMB1 


STA 


(AD) ,Y 


C42D 


C8 




140 




INY 




C42E 


DO 


FB 


150 




BNE 


SYMB1 


C430 


E6 


FB 


160 




INC 


*AD1 


C432 


CA 




170 




DEX 




C433 


no 


F5 


180 




BNE 


SYMB2 


C435 


6 




190 
200 




BTS 
.EN 





C420 / C436 / 0016 
SOURCE FILE IS EXAMPLE 2. SRC 
ERRORS 
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AD OOFA ADl OOFB SYMBl C42B SYMB2 C42i- 

With these changes, the program is shorter and faster. Try 
out the machine language routines by calling them with tine 
following BASIC program: 



100 SYS 50176 : REM GRAPHICS ON 

110 GET AS : IF A$="" THEN 110 

120 SYS 50208 : REM ERASE GRAPHIC IMAGE 

130 GET AS : IF AS="" THEN 130 

140 SYS 50192 : REM GRAPHICS OFF 



After RUNning it, the bit-mapped graphics mode of the 
Commodore 64 is turned on. When a key is pressed, the 
graphics screen is cleared. This happens almost immediately. 
With the earlier BASIC version, this took 30 seconds! By 
pressing a key again, you turn off the bit-mapped graphics 
mode and return to normal text mode. Now you can write the 
corresponding routine to initialize the color memory. 

This routine accepts two parameters - one representing the 
background color and the other the color of the set points. 
The lower four bits (nybble) of each color memory byte 
determines the background color and the upper nybble, the 
color of the set points. Each color memory byte controls a 
group of 8x8 pixels, as mentioned earlier. For example, if 
the value of the byte is $10, then the lower nybble is and 
the upper nybble is 1. This means that the background is 
black and the foreground is white for that particular 8X8 
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cell. You can pass the colors to the routine in the 
accumulator. Try to solve the problem yourself and then 
compare your solution the one below, use SC440 as the 
starting address of the routine. Here's our listing: 



FA 








AD 


= 


SFA 


00FB 






9 3 


ADl 


= 


SFB 


C440 






97 




* r. 


SC420 


C440 


ftO 


CO 


100 




LDY 


*>scooo 


C442 


B4 


PB 


102 




STY 


*ADl 


C444 


AC 


00 


104 




LDY 


*<scooo 


C446 


34 




106 




STY 


*AD 


C448 


!V2 


04 


110 




LDX 


#4 


■\1.u% 


9] 


PA 


130 


SYMB1 


STA 


(AD) ,Y 


C44C 


CB 




140 




INY 




C44D 


DO 


PB 


150 




BNE 


SYMB1 


C44F 


E6 


PB 


160 




INC 


*AD1 


C451 


CA 




170 




DEX 




C452 


DO 


P6 


180 




BNE 


SYMB1 


C454 


,--i 




190 
200 




FTS 

.EN 





C440 / C455 / 0015 
SOURCE FILE IS EXAMPLE 3. SRC 
ERRORS 



AD 00FA ADl OOFR SYMB1 C44A 

There is a small change to the previous program. The 
instruction at 180 branches to SYMB1 since the Y-register 
contains zero; reloading with zero at SYMB2 is superfluous. 
Try your version now. The starting address is SC440 or 
50240. Pass the color value to the accumulator with POKE 
780,16 

Now that we have taken care of the "housekeeping routines", 
you «n start programming the most important routine for 
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using high resolution graphics: setting and erasing 
individual points. The next routine demonstrates several 
programming techniques. 

First a word about the layout of the bit-mapped graphics 
area. 

Look at the table on the following page. It illustrates the 
relationship of the bit-mapped graphics area to the normal 
40 column by 25 lines text screen. The numbers in the table 
represent the offset from the start of the bit-mapped 
graphics memory that specify if a particular pixel is turned 
on or off. Let's call the address of the start of the bit- 
mapped graphics memory + this offset, the target address. 
For example, offset 9 of the bit-mapped graphics area 
controls the pixel at X=8, Y=l. The target address for this 
point is SE009 (SE000 + 9), where SE000 is the start of the 
bit-mapped graphics area. 
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COLUMN/ 



0-7 



X— coordinate 
3-15 312-319 



Col Col 1 



LINE 





a 




1 


9 




2 


L0 


ine 


3 


11 




4 


12 




3 


13 




6 


14 




7 


IS 




320 


328 




321 


329 




322 


330 


,ine 1 


323 


331 




324 


332 




325 


333 




326 


334 




327 


335 



Col 39 


Y-coordinate 


312 





313 


I 


314 


2 


315 


3 


316 


4 


317 


5 


318 


E 


319 


7 


632 


H 


633 


9 


634 


10 


635 


11 


636 


12 


637 


13 


638 


14 


639 


15 



Line 24 



7680 
7681 
7682 
7683 
7684 
7685 
7686 
7687 



7688 
7689 
7690 
7691 
7692 
7693 
7694 
7695 



7992 
7993 
7994 
7995 
7996 
7997 
7998 
7999 



192 
193 
194 
195 
196 
197 
198 
199 



The screen is divided into 25 lines of 40 columns each; each 
"cell" requires 8 bytes to represent the 64 pixels within 
that cell (8 pixels per/line x 8 lines/cell). The contents 
of a single byte controls one row of 8 pixels. Each bit 
controls an individual pixel on the screen. The highest- 
order bit represents the pixel on the far left; the lowest- 
order bit represents the pixel on the far right. 



bit number 
contents 



7 6 5 4 3 2 10 
10 110 
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If a byte in the bit-mapped area contains the bit pattern of 
%10001100 (or S8C in hex), this means that the first, 
fifth, and sixth pixels from the left are set. Let's call 
the contents of the byte at the target address the target 
value. 

To permit easy manipulation of the graphics, each pixel is 
addressed by its horizontal (X) and vertical (Y) 
coordinates. The coordinates range from to 319 for the X- 
axis (left side of screen to right) and from to 199 for 
the Y-axis (top of screen to bottom). 

First convert the coordinates to actual offsets within the 
bit-mapped graphics area. Note that each cell is 8-bytes in 
length. Also note that X-coordinates of thru 7 always fall 
within the same 8-byte block. The same holds true for X- 
coordinates of 8 thru 15, 16 thru 23, etc. To convert the X- 
coordinate value to the start of the appropriate 8-byte 
block, ignore the lower three bits of the x-coordinate 
value. Do this by using an AND instruction. To ignore the 
lower three bits, do the following: 

X AND %1 111 1000 

Here's an example: 

X-coordinate ==========> ^ 8 d P r imal 

Binary representat ion==> %0001 0010 aeclmal 
Mask for AKDing========> %1111 1000 

Result=================> %0001 0000 = 16decimal 
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The byte which controls the pixel with an x-coordinate of 18 
is in the block beginning at offset 16. 

The offset for the X-coordinate is calcuated as follows: 



OFFSET x = (XH * 256) + (XL AND 248) 



The reason for XL and XH is that an X-coordinate may range 
from to 319 which is beyond the 255 range of a single 
byte. Therefore the X-coordinate must be specified using two 
bytes , 

Now for the Y-coordinate. The offset for the Y-coordinate is 
calculated as follows: 



OFFSET Y = (Y AND 7) + 40 * (Y AND 248) 



The complete formula for the calculating the offset for a 
given x a Y coordinate is as follows: 

OFFSET = XH*256 + (XL AND 248) + (Y AND 7) + 40*{Y AND 248) 

Now translate the formula into machine language. Use the 
registers to pass information to the routine as follows: 

REGISTER CONTENTS 



Y => Y-coordinate 
A => XL-coordinate 
X => XH-eoordinate 



Again, an X-coordinate can range from to 319, so this 
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requires two bytes of storage. The Y-coordinate is kept in 

the Y-register. You also need a second 16-bit storage 
location for storing the offset (SUML/SUMH). 



100 XL = SFA 

110 XH = $FB 

120 SUML = SFC 

130 SUMH = SFD 

140 *= SC460 

150 STA *XL 

160 STX *XH ; SAVE X-COORDINATE 

170 TYA ; Y-COORDINATE 

180 AND #$F8 



First calculate the last term of the formula (EXP1 = 40 * (Y 
AND 248). The 6510 has no multiplication instruction. 
Therefore an alternative way of performing multiplication is 
needed. Recall that a value can be doubled by shifting the 
contents to the left. Reduce the multiplication by 40 to 
several doublings: 

A* 40 =>A*2*2+A*2*2*2 

Here, you first get twice the original value (A * 2), then 
four times (A * 2 * 2), and then five times by adding the 
original value (A * 2 * 2 + A). Three more doublings by 2 (2 
* 2 * 2 = 8) yield the original value times 40. 



190 STA *$FE ; SAVE ORIGINAL VALUE 

200 STA *SUML 

210 LDA ttO 

2 20 STA *SUMH ; CLEAR HI-BYTE 

230 ASL *SUHL ; DOUBLING THE ORIGINAL VALUE 

240 ROL *SUMH ; ..IN SUML/SUMH 

250 ASL *SUML t DOUBLING VALUE AGAIN PRODUCES 

260 ROL *SUMH ; ..ORIGINAL VALUE * 4 IN SUML/SUMH 
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When shifting 16 bits, you must use a combination of the ASL 
instruction for the low-byte (3-bits) and the ROL instruc- 
tion for the high-byte (8-bits). If the ASL instruction 
causes the highest bit to be shifted out of the operand, the 
carry flag is set. The ROL instruction shifts takes into 
account by shifting this carry flag into the low-order bit 
of the operand, keeping the mathematics exacting. Now you 
can add the original value. 



270 CLC ; CLEAR OVERFLOW 

280 LDA *SUML 

290 ADC *SFE 

300 STA *SUML ; STORE RESULT AGAIN 

310 LDA *SUMH 

320 ADC #0 

330 STA *S0MH .-ORIGINAL VALUE * 5 IN SUML/SUMH 



Why do we add zero to SUMH? If a carry occurs in the SUHL 
addition, it must be taken into account by adding the carry 
to the high-byte. Adding zero adds any carry which may have 
been generated by the addition of the low-bytes. 

Now we must double the result three more times. 



340 ASL *SUML 

350 ROL *SUMH ; ORIGINAL VALUE * 10 IN SUML/SUMH 

360 ASL *SUML 

370 ROL *SUMH j ORIGINAL VALUF. * 20 IN SUML/SUMH 

380 ASL *SUML 

390 ROL *SUMH ; ORIGINAL VALUE * 40 IN SUML/SUMH 



This takes care care of the first and most difficult term. 
Now add the second expression (t:xP2 = (Y AND 7) + EXP 1). 
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This is done using another 16-bit addition. 



400 TVA ; Y-COORDINATE IN ACCUMLATOR 

410 AND #7 

420 CLC 

430 ADC *SUML 

4 40 STA *SUHL 

450 LDA *SUMH 

460 ADC #0 

470 STA *SUMH 



Next, we add the X-value AND 248 (EXP3 = (X AND 248) + 
EXP2). EXP3 is the offset to the memory location for the 
specified X and Y coordinates. It is contained in SUML/SUMH 
after the instruction at line 550 is executed. 



480 CLC 

490 LDA *XL 
500 AND I5P8 
510 ADC *SUML 
520 STA *SUML 
530 LDA *XH 
540 ADC *SUMH 
550 STA *SUHH 



The bit-mapped graphics begins at SE000, so add this value 
to the offset (TARGET = SE000 + EXP3) to arrive at the 
target aaddress. 

560 CLC 

570 LDA #<SE000 

580 ASC *SUML 

590 STA *SUML 

600 LDA #>$E000 

610 ADC *SUMH 

620 STA *SUMH 

At last the target address is in SUML/SUMH. 
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Remember that the contents of the byte at the target address 
controls 8 pixels on the bit-mapped graphics screen. From 
the X-coord i na te, we must now determine the bit positon 
within that byte must be set to one in order for the pixel 
to be turned on. 

Earlier we ignored the lowest three bits of the X-coordinate 
to calculate the target address. Here's where use use the 
information contained in those three bits. First isolate 
the lowest three bits of the X-coordinate: 

XB = XL AND 7 

XB is now a value between and 7 and represents the X- 
coordinate offset within the bit-mapped control byte. The 
following table shows the correspondence of the X-coordinate 
offset and its bit position within the control byte: 



X 






coord . 




bit 


of Fsct 




position 





= > 


7 


1 


= > 


6 


2 


=> 


5 


3 


=> 


4 


4 


=> 


3 


5 


= > 


2 


6 


= > 


1 


7 


=: 






The lowest three bits of the X-coordinate and the bit 
positon are inverses of each other. You can convert an >- 
coordinate offset to a bit position by using the exclusive 
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OR instruction: 



630 LDA *XL ;low-byte oE X-coordinate 

640 AND #7 ; isolate the lowest three bits 

6 50 EOR #7 ; convert to bit position 



From the earlier calculations, we found the target address. 
From the above calculations, we found the bit position which 
needs to be set at that target address to turn on the pixel. 
We know that each bit position has a certain value, which we 
call the target value. Now we have to convert that bit 
position to the target value. This target value is then 
stored at the target address to set the specific pixel. 

To calculate the target value corresponding to this bit 
position we shift a one bit to the left for the number of 
times indicated by the bit position. Here's the code: 



660 TAX ; bit position in X-register 

670 LDA #1 ;"one" bit 

680 SHIFT DEX 

690 BMI OK 

700 ASL A ; shift to left 

710 BNE SHIFT 

7 20 OK ... 



The bit position is contained in the accumulator after 
executing the instruction in line 650. The target value is 
calculated by shifting left as many times as specified by 
the X-register. In lines 680 and 690 the contents of the X- 
register are decremented and checked to see if it's negative 
(less than zero). If not, continue shifting another position 
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to the left. The branch in line 710 is always executed 
because the result of the shift is never equal to zero. 

Storing the target value contained in the accumulator at the 
target address turns on the desired pixel. 

But there's another consideration. Remember that each target 
address controls 8 pixels. If another pixel is already set 
at that target address, then storing the above target value 
destroys the previous value and erase the other pixels 
controlled by the same target address. 

To avoid this, you should combine the previous value at the 
target address with new target value. Use the OR instruction 
for this. By ORing the old value with the new target value, 
any previously set pixels are not erased. 

The target address is pointed to by the contents of 
SUML/SUMH. To combine the previous value with the new 
value, you can do the following: 



720 OK LDY *0 
730 ORA (SUML) ,Y 
740 STA (SUML) ,Y 
7 50 RTS 



Now the new pixel is set and we are done. There is one small 
point which we overlooked. 
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The OR instruction in line 730 accesses the contents of a 
memory location in the range from SE000 to $FFFF. The 
Commodore 64 normally returns the value of the contents of 
the kernal ROM also located at these same addresses (but in 
a different bank). A "switch" controls access to either the 
ROM or RAM at those addresses. The ORA (SUML),¥ instruction 
above would access the ROM and not the bit-mapped graphics 
area. To access the RAM containing the bit-mapped graphics 
area, set the switch (I/O register) located at address 1. 
When you do this, you must inhibit the interrupts because 
the interrupt routines are not available while the ROM is 
switched off. After the contents at the target address are 
updated, the interrupts are re-enabled. 



730 LDX #$34 ; RAM CONFIGURATION 

740 SEI ; INHIBIT INTERRUPTS 

7 50 STX *1 

760 ORA (SUML) ,Y 

770 STA (SUML).Y j SET POINT 

780 LDX #$37 ; ROM CONFIGURATION 

790 STX *1 

800 CLI ; ENABLE INTERRUPTS 

810 RTS 

820 .EN 



Here is the complete assembly listing oE all of the routines 
that we've talked about in this chapter; 



00 FA 






100 XL 


= 


SFA 


OOFB 






110 XH 


= 


$FB 


00FC 






120 SUML 


= 


$FC 


OOFD 






130 SUMH 


= 


$FD 


C460 






140 


*5B 


$C460 


C460 


as 


i- A 


150 


STA 


*XL 


C462 


86 


PB 


160 


STX 


*XH ; SAVE X-COORDINATE 
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C464 


98 




C465 


29 


P8 


C467 


85 


FE 


C469 


8 5 


PC 


C46B 


AS 


00 


C46D 


B5 


FD 


C46F 


06 


FC 


C471 


26 


FD 


C473 


06 


FC 


C475 


2 6 


FD 


C477 


18 




C478 


A 5 


FC 


C47A 


6 5 


FE 


C47C 


8 5 


FC 


C47E 


A5 


FD 


C4B0 


69 


00 


C482 


85 


FD 


C484 


06 


FC 


C486 


26 


FD 


C488 


06 


FC 


C48A 


26 


FD 


C48C 


06 


PC 


C48E 


26 


FD 


C490 


98 




C491 


29 


07 


C493 


18 




C494 


65 


FC 


C496 


8 5 


FC 


C498 


A 5 


PD 


C4 9A 


6 9 


00 


C49C 


BS 


PD 


C49E 


18 




C4 9F 


A5 


PA 


C4A1 


29 


F8 


C4A3 


65 


FC 


C4A5 


8 5 


FC 


C4A7 


A 5 


FB 


C4A9 


65 


FD 


C4AB 


8 5 


PD 


C4AD 


18 




C4AE 


A9 


00 


C4B0 


65 


PC 


C4B2 


85 


FC 


C4B4 


A9 


E0 


C4B6 


E 5 


PD 


C4B8 


8 5 


FD 


C4BA 


A 5 


PA 


C4BC 


29 


07 


C4BE 


49 


07 


C4C0 


AA 




C4C1 


A9 


0] 


C4C3 


CA 




C4C4 


30 


3 


C4C6 


0A 




C4C7 


DO 


FA 



170 


TYA 


; Y-COORDINATE 


180 


AND 


#SF8 


190 


STA 


*SFE 


200 


STA 


*SUML 


210 


LDA 


10 


220 


STA 


*SUMH 


230 


ASL 


*SUML 


240 


ROL 


*SUMH 


250 


ASL 


*SUML 


260 


ROL 


*SUMH 


270 


CLC 


; ERASE CARRY 


280 


LDA 


*SUML 


290 


ADC 


*SFE 


300 


STA 


*SUML 


310 


LDA 


*SUMH 


320 


ADC 


#0 


330 


STA 


*SUMH 


340 


ASL 


*SUML 


350 


ROL 


*SUMH 


360 


ASL 


*SUML 


370 


ROL 


*SUMH 


380 


ASL 


*SUML 


390 


ROL 


*SUMH 


4 00 


TYA 


; Y-COORDINATE 


410 


AND 


#7 


420 


CLC 




430 


ADC 


*SUML 


440 


STA 


*SUHL 


450 


LDA 


*SUMH 


460 


ADC 


#0 


470 


STA 


*SUMH 


480 


CLC 




490 


LDA 


*XL 


500 


AND 


#SF8 


510 


ADC 


*SUML 


520 


STA 


*SUML 


530 


LDA 


*XH 


540 


ADC 


*SUHH 


550 


STA 


*SUMH 


560 


CLC 




570 


LDA 


KSEOO0 


580 


ADC 


*SUML 


590 


STA 


*SUML 


600 


LDA 


#>SE000 


610 


ADC 


*SUMH 


620 


STA 


*SUMH 


630 


LDA 


* X I , 


640 


AND 


#7 


650 


EOR 


17 


660 


TAX 




670 


5 DA 


tl 


680 SHIFT 


DEX 




690 


BMI 


OK 


700 


ASL 


A 


710 


BNE 


SHIFT 
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C4C9 


AO 


00 


7 20 OK 


LDY 


#0 


C4CB 


A 2 


34 


730 


LDX 


#S34 


C4CD 


7fl 




740 


SEI 


*1 


C4CE 


8 6 


01 


750 


STX 




C4D0 


1 I 


l-'C 


760 


ORA 


(SUML) ,Y 


C4D2 


91 


FC 


770 


STA 


(SUHL) ,Y 


C4D4 


A 2 


37 


780 


LDX 


fS37 


C4D6 


a 6 


Ul 


790 


STX 


*1 


C4D8 


58 




800 


CLI 




C4D9 


6 




810 
820 


RTS 
.EN 





C460 / C4DA / 007A 
SOURCE FILE IS EXAMPLE 3. SRC 
ERRORS 



OK C4C9 SHIFT C4C3 SUMH 00FD SUML 00FC 
XH 00FB XL 00FA 



Now to try out these routines, we can type this short BASIC 
program to call the high resolution graphics: 



100 SYS 50176 : REM GRAPHICS ON 

110 SYS 50208 : REM ERASE GRAPHIC IMAGE 

120 POKE 780,16 : REM BLACK/WHITE 

130 SYS 50240 : REM INITIALIZE COLOR 

140 FOR X=0 TO 319 

150 POKE 780 ,X AND 255 : REM X-LO 

160 POKE 781, X / 256 : REM X-HI 

170 POKE 782,X * 0.625 : REM Y 

180 SYS 50272 : SET POINT 

190 NEXT 

200 GET AS : IF A$ = "'" THEN 200 

210 SYS 50192 : REM TURN OFF 



RUNning this program draws a diagonal line from the upper 
left to the lower right corner. Pressing a key returns the 
Commodore 64 to the normal text mode. 

Now consider how a point can be erased. The routine to 
calculate the target address is the same for setting or for 
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erasing a point. By changing line 760, you can cause the 
routine to erase a pixel instead of setting it. Look at what 
happens when you set a point with ORA. 



previous bit pattern % 01001000 
pattern for new pixel % 00010000 



result of ORA % 01011000 

The new point is set by using an ORA instruction. To erase 
the same point use the AND instruction. 

previous bit pattern % 01011Q00 

pattern for pixel to be erased % 00010000 

result of AND % 00010000 

Something is wrong here! All the points are erased except 
for the one you want to erase. The bit values must be 
inverted prior to ANDing. You can can do this with the EOR 
intruction. 



pixel to be erased % 00010000 
invert all bits % 11111111 



gives the new pattern % 11101111 

Except for the point to be erased, all the bits are now set 
and the AND operation with the original value works. 



previous bit pattern % 01011000 
new pattern % 11101111 



correct pattern % 01001000 
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Now add the erase function to the other routines. You can 

use the carry flag to signal whether the point is to be set 
or erased. If the carry flag is clear, then the routine 
erases the pixel. The routine must make note of the 
condition of the carry flag. Use the PHP instruction to save 
the status register on the stack, as in line 14 5. Examine 
the flags by using a PLP instruction in line 735. Here are 
the remaining changes to the program: 



760 BCC ERASE 

770 ORA (SUML) , Y 

780 BCS 0K2 

790 ERASE EOR #SFF ; INVERT 

800 AND (SUML) ,Y 

810 OK2 STA (SUML) 

820 LDX #$37 

830 STX *1 

840 CLI 

8 50 RTS 

860 .EN 



If the carry flag is clear, jump to line 790 where the bits 
are inverted with EOR #$FF. The AND instruction is executed 
and the result is stored. IE, on the other hand, the carry 
flag is set, then the bit is set with ORA as before and the 
new value is again stored at the target address. The 
complete listing is shown below: 



0OFA 






100 


XI 


= 


SFA 


0OFB 






110 


XH 


= 


SFB 


OOFC 






120 


SUML 


= 


$FC 


00FD 






130 


SUMH 


= 


SFD 


C460 






140 




* - 


SC460 


C460 






145 




PHP 




C461 


85 


PA 


150 




STA 


*XL 


C463 


86 


PB 


160 




STX 


*XH ; X-COORDINATE 


C465 


98 




170 




TYA 


; Y-COORDINATE 
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C466 


29 


P8 


180 


AND 


#SF8 




C468 


85 


1-' E 


190 


STA 


*SFE 




C46A 


85 


PC 


200 


STA 


*SUML 




C46C 


A9 


00 


210 


LDA 


#0 




C46E 


8 5 


FE 


220 


STA 


*SUMH 




C470 


06 


PC 


230 


ASL 


*SUML 




C472 


26 


FD 


240 


ROL 


*SUHH 




C474 


06 


PC 


250 


ASL 


*SUHL 




C476 


26 


!■ D 


260 


ROL 


*SUMH 




C478 


18 




270 


CLC 


; 


ERASE CARRY 


C479 


A5 


FC 


280 


LDA 


*SUML 




C47B 


65 


PE 


290 


ADC 


*SFE 




C4 7D 


85 


FD 


300 


STA 


*SUHL 




C4 7F 


AS 


FD 


310 


LDA 


*SUMH 




C481 


69 





320 


ADC 


#0 




C483 


85 


FD 


330 


STA 


*SUMH 




C485 


06 


FC 


340 


ASL 


*SUML 




C487 


26 


FD 


3 50 


ROL 


*S(JMH 




C489 


06 


PC 


360 


ASL 


*SUHL 




C48B 


26 


PD 


370 


ROL 


*SUHH 




C48D 


6 


FC 


380 


ASL 


*SUML 




C48F 


26 


FD 


390 


ROL 


*SUMH 




C491 


9 8 




400 


TYA 


r 


Y-COORDINATE 


C492 


2" 


07 


410 


AND 


#7 




C494 


LB 




420 


CLC 






C495 


6d 


FC 


430 


ADC 


*SUML 




C497 


B5 


FC 


440 


STA 


*SUML 




C49 9 


A3 


FD 


450 


LDA 


*SUMH 




C496 


69 


00 


460 


ADC 


to 




C49D 


es 


FD 


470 


STA 


*SUMH 




C49F 


1 3 




480 


CLC 






C4A0 


A5 


i- A 


490 


LDA 


*XL 




C4A2 


2" 


Fa 


500 


AND 


#SFB 




C4A4 


6 5 


FfJ 


510 


ADC 


*SUML 




C4A6 


B5 


FC 


520 


STA 


*SUML 




C4A8 


A. 5 


FB 


530 


LDA 


*XH 




C4AA 


65 


FD 


540 


ADC 


*SUMH 




C4AC 


85 


FD 


550 


STA 


*SUMH 




C4AE 


18 




560 


CLC 






C4AF 


RS 


00 


570 


LDA 


#<SE000 




C4B1 


65 


PC 


580 


ADC 


*SUML 




C4B3 


8 5 


FC 


590 


STA 


*SUHL 




C4B5 


R9 


EO 


600 


LDA 


#>SE000 




C4B7 


6 3 


PD 


610 


ADC 


*SUMH 




C4B9 


3 5 


FD 


620 


STA 


*SUMH 




C4BB 


A5 


FA 


630 


LDA 


*XL 




C4BD 


29 


07 


640 


AND 


#7 




C4BF 


49 


07 


650 


EOR 


= 7 




C4C1 


AA 




660 


TAX 






C4C2 


Av 


01 


670 


LDA 


il 




C4C4 


CA 




680 SHIFT 


DEX 






C4C5 


30 


3 


690 


BMI 


OK 




C4C7 


OA 




700 


ASL 


A 




C4C8 


un 


PA 


710 


BNE 


SHIFT 




C4CA 


A0 





7 20 OK 


LDY 


#0 
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C4CC 


A2 


34 


730 


LDX 


#334 




C4CE 


28 




735 


PLP 






C4CF 


78 




740 


SEI 






C4D0 


8 6 


01 


750 


STX 


*1 




C4D2 


90 


4 


760 


BCC 


ERASE 




C4D4 


1 1 


PC 


770 


ORA 


(SUML) 


,Y 


C4D6 


BO 


04 


780 


BCS 


OK2 




C4D8 


49 


Ft 


790 ERASE 


EOR 


#SFF 




C4DA 


31 


FC 


800 


AND 


(SUML) 


,Y 


C4DC 


91 


PC 


810 OK2 


STA 


(SUML) 


,v 


C4DE 


a;: 


37 


820 


LDX 


#S37 




C4E0 


B6 


01 


830 


STX 


*1 




C4E2 


58 




840 


CLI 






C4E3 


6 




850 
860 


RTS 
.EN 







C460 / C4E4 / 0084 
SOURCE FILE IS EXAMPLE 4. SRC 
ERRORS 



ERASE 


C4D8 


OK 


C4CA 


OK 2 


C4DC 


SHIFT 


C4C4 


SUMH 


00FD 


SUML 


0OFC 


XH 


00FB 


XL 


00FA 



Now change the previous BASIC "test" program: 



100 SYS 50176 : REM GRAPHICS ON 

110 SYS 51208 : REM ERASE GRAPHIC IMAGE 

120 POKE 780,16 

130 SYS 50240 : REM SET COLOR 

140 1=1 

150 FOR X=0 TO 319 

160 POKE 780, X AND 255 : REM X LO 

170 POKE 781, X AND 255 : REM X HI 

180 POKE 782, X * 0.625 : REM Y 

190 POKE 783, I : REM SET/ERASE 

200 SYS 50272 : NEXT 

210 GET A3 : IF AS="" THEN 1=1-1 : GOTO 150 

220 SYS 50192 : REM GRAPHICS OFF 



This program draws a diagonal line across the screen and 
then erases it again. The routine determines if a pixel is 
to be set or erased, by the condition of the carry flag 
which is passed in memory location 783. Because the carry 
flag occupies bit position zero within the status register, 
the corresponding values are one and zero. 
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You can stop the program by pressing a key. The original 
screen contents is preserved, just as the graphics screen is 
also preserved, when you want to switch back to high 
resolution graphics mode, simply call the routine to erase 
the screen and you can start anew. Now you can experiment 
some more with the routine for the color representation. 



100 SYS 50176 : REM GRAPHICS ON 

110 SYS 51208 : REM ERASE GRAPHICS 

120 POKE 780,16 

130 SYS 50240 : REM SET COLOR 

140 REM 

150 FOR X=70 TO 150 : FOR Y=X TO 199 

160 POKE 780, X : REM X LO 

170 POKE 781, : REM X HI 

180 POKE 78 2, Y : REM Y 

190 POKE 783, 1 : REM SET 

200 SYS 50272 : NEXT : NEXT 

210 FOR C=0 TO 255 

220 FOR 1=1 TO 500 : NEXT 

230 POKE 780, C 

240 SYS 50240 : REM COLOR 

250 NEXT 

260 SYS 50192 : REM GRAPHICS OFF 



This program draws a figure and then displays it in all of 
the 256 possible color combinations. 

To summarize, you have learned about indirect indexed 
addressing; you have worked with the logical operations to 
set and erase designated bits; you have also used the stack 
for storing data; and you have performed 16-bit additions 
and shifts. 

An important programming concept still missing is the use of 
subroutines. This is discussed in the next section. 
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8. Extending BASIC 

In the previous section we passed parameters to the graphics 
routine by means of POKE commands. Now we present a more 
elegant way of doing this. 

This technique passes parameters the same way as parameters 
are passs to the BASIC commands. 

Let's take a simple BASIC command: 

POKE A, B 

The variables A and B are arguments for the POKE command. 
The rules of BASIC allow you to use any expressions, 
constants or subscripted variables in place of A and B. For 
example, the following is a legal BASIC statement: 

POKE A( 1000)/750*INT(X*/9) , EXPf ABS( SIN( 3*A) ) ) +2 

The BASIC interpreter uses a routine in its ROMs to evaluate 
the value of the expressions. You can let the BASIC 
interpreter do hard evaluation work by calling this routine 
from your own programs. In addition, you can perform range 
checking by using various entry points to the BASIC ROM 
routines . 

When evaulating the arguments for the POKE routine, for 
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example, the routines check to make sure that the first 
parameter is a value between and 65535 (16-bit). If not, 
the error message ILLEGAL QUANTITY is issued. The routines 
then check the second parameter for a value between to 
255, and the same error message is given if it fails this 
test . 

How can you use these routines in your own programs? 

First you must understand a programming technique that we 
have not discussed up to this point - the subroutine. 

You have probably used subroutines when programming in 
BASIC. The corresponding commands in BASIC are: 

GOSUB and RETURN 

The GOSUB command branches to a given line. It differs from 
the GOTO instruction in that the interpreter remembers the 
place from which it branched. When the subroutine is 
finished, and the interpreter encounters a RETURN, the 
previously saved return address is fetched and execution 
branches back to the place from where the subroutine call 
was made. 

The 6510 microprocessor has two instructions for managing of 
subroutines. These commands correspond exactly to their 
BASIC counterparts. 
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JSR and RTS 

JSR (jump to subroutine) calls the subroutine while the RTS 
instruction (return from subroutine) takes care of branching 
back to the calling routine. When do you use these 
instructions? 

Subroutines in machine language programs are used in the 
same circumstances as in BASIC. If a certain routine is to 
be used more than once, it should be made into a subroutine. 

What does the processor do when it encounters a JSR instruction; 

Before it branches to the subroutine, it saves the current 
address of the program counter so that it knows where to 
return after the subroutine is complete. Where does it save 
this information? It uses the stack! 

A subroutine call saves the current address (two bytes) of 
the program counter on the stack. Later, when the RTS 
instruction is encountered, the address on the stack 
replaces the program counter contents. The instruction 
following the JSR is then executed. 

So that the 6510 knows at which place on the stack to save 
to and retrieve from, there is a register called the stack 
pointer (shortened to SP). This register is a pointer to the 
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current position of the stack. Let's see what happens when 
the JSR and RTS commands are executed. 



C000 20 00 CI JSR SC100 
C003 

C100 60 RTS 



When this program is started at address SCOOO, a call is 
made to the subroutine at address SC100. In our example, the 
RTS instruction is encountered immediately and the processor 
returns to the instruction following the subroutine call, 
which is SC003 in our case. Let's see what happens to the 
stack and the stack pointer. 



Address Instruction Stack pointer Stack 

SCOOO JSR $C100 SF9 S01F9 XX 



The data from any previous operations is located at stack 
address S01F9. When the processor encounters the JSR 
instruction, it takes the contents of the program counter, 
increments it by two and divides it into low and high bytes. 
It takes the high-byte and stores it at the address to which 
the stack pointer points. The stack pointer is then 
decremented by one: 



Address Instruction Stack pointer Stack 

SCOOO JSR SCOOO SF8 S01F9 CO 

S01F8 XX 



Now the low-byte of the address is saved on the stack and 
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the stack pointer is again decremented. The program counter 
is then set to the starting address of the subroutine: 



Address Instruction Stack pointer Stack 
SC100 RTS $F7 S01F9 CO 

$01F8 02 
S01F7 XX 



So during a JSR, the program counter is saved on the stack 
and the stack pointer is decremented by two. The stack 
pointer always points to the next free location on the 
stack . 

The RTS instruction performs these functions in reverse. 
First the stack pointer is incremented and then the low-byte 
is fetched from the stack: 



Address Instruction Stack pointer Stack 
$C100 RTS SF8 S01F9 CO 

S01F8 02 
S01F7 XX 



The value S02 is placed into the low-byte of the program 
counter. Then stack pointer is incremented: 



Address Instruction Stack pointer Stack 
$C100 RTS $F9 S01F9 CO 

S01F8 02 
S01F7 XX 



SCO is pulled from the stack and becomes the high-byte of 
the program counter. The program counter now contains SC002. 
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The program counter is incremented by one and the next 
instruction is fetched from SC003: 



Address Instruction Stack pointer Stack 
$C003 ... SF9 S01F9 CO 

S01F8 02 
S01F7 XX 



Notice that the stack pointer contains the same value after 
the return from the subroutine as before the call. 

It is also possible to nest subroutines with this technique. 
If a subroutine is called from another subroutines, its 
return address is saved on the stack. The stack pointer is 
set to SF5 in our example. The last return address is 
fetched by the next RTS instruction and the stack pointer is 
incremented to SF7. RTS will always jumps back to the 
address of the last subroutine call. Through this, it is 
possible to nest levels of subroutines. 

The 6510 microprocessor can save and retrieve the contents 
of the accumulator and the processor stack register to and 
from the stack. The commands are PHA and PLA for the 
accumulator and PHP and PLP for the status register. These 
commands also affect the stack pointer 1 . Using these 
instructions you can, for example, save the contents of the 
status register and later retrieve it. Thus the stack can be 
used as a "scratchpad". 
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PHA ; accumulator to stack 

TYA 

PHA ; and Y register 

TXA 

PHA ; and X register 

PLA 

TAX ; get X register back 

PLA 

TAY ; and Y register 

PLA ; and accumulator 



The x and Y registers cannot be saved directly onto tie 
stack. You have to transfer the contents of the the X- 
register or Y-register to the accumulator first and then 
placed the contents to the stack with a PHA instruction. 
Notice that the registers must be pulled from the stack in 
the reverse order they were pushed on. This is in accordance 
with to the principle of the stack. The last value place on 
the stack is the first value retrieved from the stack - in a 
last in-first out (LIFO) order. 

The operation of the stack and the stack pointer can be 
illustrated by the single-step simulator. After each step, 
you can observe the contents of the registers. The simulator 
becomes a very useful learning tool. 

Now let's can return to our discussions about the BASIC 
interpreter routines for passing parameters. 

A routine called GETBYT in the BASIC ROMs, reads an 
expression from BASIC text, checks it for a range from and 
255, and returns this value in the X-register. 
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Another routine called FRMNUH, converts a expression to 16- 
bit (0 to 65535) values. 

The routine GETADR, checks an expression for a range from 
to 65535. If it is valid, the low-byte of the value is 
returned in memory location $14 and the high-byte of the 
value is returned in memory location 515. The addresses of 
these routines are listed below. 

Earlier we talked about how the BASIC interpreter reads each 
line character by character in order to find the BASIC 
keywords. In doing so, BASIC keeps track of its place in the 
line by using an internal variable called TXTPTR (for text 
pointer). At any given time, TXTPTR points to the BASIC text 
which the interpreter is processing. 

If you want to pass a parameter from a BASIC program to a 
machine language routine, you can use the BASIC command: 

SYS AAAAA,PPP 

AAAAA is the decimal address of the machine language 
routine. PPP is the parameter that you are passing to the 
machine langauge routine. 

If you want to pass several parameters, you must separate 
these parameters from each other with commas. The BASIC 
interpreter has a routine to check for commas This routine 
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is called CHKCOM and checks to see if TXTPTR is pointing to 
a comma. 

If you want to read a character directly from the BASIC 
text, the routine CHRGOT gets the character pointed to by 
TXTPTR and puts it into the accumulator. The routine CHRGET 
does the same thing but first increments TXTPTR before 
getting the character. 

These routines also set certain flags which give additional 
information about the character read. If the zero flag is 
set, then either a zero byte (end-of-line in BASIC programs) 
or a colon ":" was read, indicating the end of the 
statement. If a digit is read, the carry flag is clear. 

Here is a summary of the addresses: 



GETBYT SB79E 

FRMNUM SAD8A 

GETADR SB7F7 

CHKCOM SAEFD 

CHRGOT $0079 

CHRGET $0073 

GETPAR SB7EB 



To get a 16-bit parameter followed by an 8-bit parameter 
such as for the POKE command, you can use the routine 
GETPAR. The routine GETPAR calls the following routines in 
order: FRMNUM, GETADR, CHKCOM, and GETBYT. 

You can use GETPAR for the bit-mapped graphics routines 
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because the value for the X-coordinate is a 16-bit number 
(0-319) and the value for the Y-coordinate (0-199) is an 8- 
bit nunber. If the values exceed 65535 or 255, respectively, 
the BASIC interpreter responds with ILLEGAL 0UANTITY. So 
GETPAR checks the ranges of the coordinates and display this 
error message if required. 



To use these routines for parameter passing, a call would 
look like this: 

SYS 50240 ,X,Y 

When BASIC encounters this statement, it sets up to execute 
the machine language routine beginning at memory location 
50240. The BASIC TXTPTR is left pointing at the first comma 
following the 50240. 

Using this technique, you do not have to POKE the parameters 
into memory. The program is also a lot easier to follow. 

Now let's reprogram the graphics routines again, but 
incoprorating the new techniques: 



100 JSR CHKCOM ; COMMA FOLLOWING? 

110 JSR GETPAR ; GET COORDINATES 

120 STX YCOOR ; SAVE Y-COORDINATE 

130 LDA S14 

140 STA XL ; X-COORDINATE LO 

150 LDA $15 

160 STA XH 
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First we check for a comma which separates the SYS address 
from the X-coordinate. Next we use the routine which gets 
two parameters, GETPAR. The value of the one-byte parameter, 
the V-coordinate, is returned in the X-register which we 
save at the address YCOOR. The value of the second 
parameter, the X-coordinate returned in S14/S15 and saved in 
XL and XH, Now check that the X and Y-coordinates lie in the 
permitted value range. If the Y-coordinate is less than 200, 
it is legal, otherwise display ILLEGAL OUANTITY. The same 
type of range checking is performed for the X-coordinate. 



170 CPX #200 ; Y >= 200? 

180 BCC OK 

190 ERROR JMP ILLEGAL 

200 OK LDA XH 

210 CMP #>320 

220 BCC OKI 

230 BNE ERROR 

235 LDA XL 

240 CMP #<320 

250 BCS ERROR 

260 OKI .. . 



The remainder of the program is the same as the earlier 
version. 
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9. Input/Output Operations 

In BASIC you use specific commands to input characters from 
the keyboard, display them on the screen and communicate 
with peripherals. Some of the BASIC commands to do this are: 



OPEN 

CMD 

PRINT* 

INPUTt 

CLOSE 



In machine language programming you use similar techniques. 
The operating system already contains routines which 
correspond to the BASIC commands above. You can use these 
routines to perform input or output operations. 

Some of the routines follows: 



OPEN 



This routine requires three parameters: the logical file 
number, the device address, and the secondary address, and 
an optional filename. These parameters are set by the 
routines SETFLS and SETNAM. The OPEN routine itself needs no 
parameters but it does require a prior calls to the other 
rout i nes. 
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SETFLS 

To use SETLFS, load the accumulator with the logical 
filenumber, the X-register with the device number, and the 
Y-register with the secondary address and then call this 
routine to set these parameters for the OPEN routine. 



SETNAH 

This routine is defines a filename. Load the accumulator 
with the of the filename (0 indicates that no filename will 
be used); place the address of the filename {the first 
memory location it is stored in) in the X-registser (low- 
byte) and Y-register (high-byte). 



PRINT 

Load the accumulator with the character you wish to output 
and then call this routine. Normally the output goes to the 
screen. If you want to output to the printer, for example, 
you must first open a file to the printer (device 4) with 
the OPEN routine and then call the next routine. 
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CHKOUT 

This routine corresponds to the CHD instruction in BASIC. To 
output a character to an opened file, load the X-register 
with the logical file number and call the subroutine CHKOUT. 
All output from the PRINT instruction is sent to this device 
until cancelled with the next routine. 



CLBCH 

CLRCH cancels the CMD mode set by the CHKOUT instruction. It 
requires no parameters. 



INPUT 

This routine gets a character from the keyboard and returns 
it in the accumulator. To read data from a file, first open 
and then activate it with the next routine. 



CKKIN 

Load the logical file number in the X-register and call this 
routine. After calling this routine, all input is read from 
this device until cancelled with CLRCH. 
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CLOSE 

Load the logical file number into the accumulator and call 
this routine to close a file. 



The following table contains the addresses of these 
routines . 

Routine Address 



OPEN 


SFFCO 


SETFLS 


$FFBA 


SETNAM 


$FFBD 


PRINT 


SFFD2 


CHKOUT 


SFFC9 


CLRCH 


$FFCC 


INPUT 


SFFCF 


CHKIN 


$FFC6 


CLOSE 


SFFC3 



To demonstrate how to use these routines, let's convert the 
following BASIC commands to machine language: 



OPEN 1,8,15 
PRINTS 1,"I" 
CLOSE 1 



100 LDA #1 ; LOGICAL FILE NUMBER 

110 LDX #8 ; DEVICE NUMBER 

120 LDY #15 ; SECONDARY ADDRESS 

130 JSR SETFLS 

140 LDA #0 

150 JSR SETNAM ; NO NAME 

160 JSR OPEN j OPEN FILE 

170 LDX #1 ; LOGICAL FILE NUMBER 

180 JSR CHKOUT ; OUTPUT TO FILE 

190 LDA #73 ; "I" 

200 JSR PRINT 

210 JSR CLRCH 

220 LDA #1 ; LOGICAL FILE NUMBER 

230 JSR CLOSE 

240 RTS 
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Lines 100 to 130 setup the parameters for the OPEN. There is 
no filename, so the length of the filename is set to zero in 
line 140 to 150. Line 160 OPENS the file. Now output to the 
logical file 1 is enabled (lines 170-180) and the ASCII 
value of "I" is transmitted to the disk (device 8) by the 
PRINT routine to initialize the diskette. Routine CLRCH, 
redirects output to the screen. Finally, lines 220 and 230 
CLOSES the file and execution returns to BASIC {or other 
calling program) with the RTS. 

The next example, reads the error channel of the disk drive 
and display the error message on the screen. You can do this 
in BASIC like this: 



100 OPEN 1,8,15 

110 INPUT#1, A,BS,C,D 

120 PRINT A; B$ ; C; D 

130 CLOSE 1 



Because we can output the error message directly to the 
screen, we need no variables in our program. We simply read 
characters from the channel until the status variable ST, is 
equal to 64, signaling the end of the error message. We cen 
do this with the following BASIC program: 



100 OPEN 1,8,15 

110 GET#1, A$ : PRINT AS; 

120 IF ST <> 64 THEN 110 

130 CLOSE 1 



To do this in machine language, you must know that the 
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status variable of the operating system ST, is stored in 
location 144 or S90. Let's try the machine language version: 



10 OPEN = SFFCO 

20 SETFLS = SFFBA 

30 SETNAM = SFFBD 

40 PRINT = SFFD2 

50 CLRCH = 5FFCC 

60 INPUT = SFFCF 

70 CHKIN = SFFC6 

80 CLOSE = SFFC3 

90 STATUS = S90 ; STATUS VARIABLE 
100 LDA #1 ; LOGICAL FILE NUMBER 
110 LDX #8 ; DEVICE NUMBER 
120 LDY #15 ; SECONDARY ADDRESS 
130 JSR SETFLS 
140 LDA #0 

150 JSR SETNAM ; NO NAME 
160 JSR OPEN ; OPEN FILE 
170 LDX #1 ; LOGICAL FILE NUMBER 
180 JSR CHKIN ; INPUT FROM ERROR CHANNEL 
190 LI JSR INPUT J GET CHARACTER 
200 JSR PRINT ; AND OUTPUT 
210 BIT STATUS ; TEST STATUS 
2 20 BVC Ll 

230 JSR CLRCH ; INPUT FROM DEFAULT 
240 LDA #1 
250 JSR CLOSE 
260 RTS 
270 .EN 



The routine from the previous program for OPENing the file 
is the same. This time, we input data from the file. Lines 
170 and 180 setup to do this. The X-register is loaded with 
the logical file number 1 and the routine CHKIN is called, 
Input is now read from the disk drive. Line 190 reads a 
character from the disk and line 200 writes it to the screen 
with JSR PRINT, The output goes to the screen because we did 
not previously use CHKOUT. The status variable ST is tested 
with the BIT instruction. If the end of the file is reached, 
status variable ST is set to 64. 64 is equal to 2° oc 
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%01000000 In binary. Therefore bit 6 of this memory location 
is set at end of file. What does the BIT instruction do? It 
copies bit 6 of the addressed memory location into the V 
flag and bit 7 into the N flag. After the BIT instruction, 
you need only test to see if the V flag is set. The 
instruction BVC branches if the v flag is clear. In this 
case, the end has not been reached and we branch back to the 
read more from the disk. If the V flag is set, we reset the 
input channel with JSR CLRCH and close the file. 

Assemble this program and try it out. Remember, however, 
that our assembler allows a maximum of only five characters 
for symbol names. 



10 


cooo 








OPEN 


= 


SFFC0 




20 


cooo 








SETFLS 


= 


$FFBA 




30 


cooo 








SETNAM 


= 


SFFBD 




40 


cooo 








PRINT 


= 


SFFD2 




50 


cooo 








CLRCH 


= 


SFFCC 




60 


cooo 








INPUT 


= 


SFFCF 




70 


cooo 








CHKIN 


= 


SFFC6 




80 


cooo 








CLOSE 


= 


SFFC3 




90 


! cooo 








STATUS 


= 


$90 




L0< 


): COOO 


R9 


01 






LDA 


#1 


^LOGICAL FILE NUMBER 


111 


) : C002 


A2 


08 






LDX 


#8 


; DEVICE NUMBER 


12( 


): C004 


AQ 


OF 






LDY 


ft 15 


; SECONDARY ADDRESS 


i it 


>: C006 


20 


BA 


FF 




JSR 


SETFLS 




]■! 


)i C009 


A9 


00 






LDA 


#0 


;NO FILENAME 


151 


Ji C00B 


20 


br: 


FF 




JSR 


SETNAM 




161 


): C00E 


20 


CO 


FF 




JSR 


OPEN 


;OPEN FILE 


171 


>l con 


pa 


1 






LDX 


#1 


; INPUT 


L8< 


): C013 


2 


C6 


FF 




JSR 


CHKIN 


JFROH ERROR CHANNEL 


1 9 1 


): C016 


20 


CF 


FF 


LI 


JSR 


INPUT 


;CHARACTER FROM DISK 


201 


>: CO 19 


20 


M 


I-' I- 




JSR 


PRINT 


;AND OUTPUT 


211 


): C01C 


:>a 


90 






BIT 


STATUS 


;TEST STATUS 


22 


): C01E 


50 


P6 






BVC 


LI 




23 


): C020 


20 


cc 


FF 




JSR 


CLRCH 




24 


)s C023 


A" 


01 






LDA 


#1 




2 3 


): C025 


20 


C3 


FF 




JSR 


CLOSE 


; CLOSE FILE 


26 


)s C028 


60 








RTS 
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Now you can try out the machine language routine by typing: 
SYS 49152 

The error message from the disk appears on the screen, such 
as : 

00, OK, 00, 00 
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10. A BASIC Loader Program 

You can enter the machine language program as a sequence of 
numbers in DATA statements. They can be READ by a BASIC 
program and stored in memory with POKE. You can output the 
values in decimal by means of a small BASIC program and 
insert these as DATA statements in a loader program. Here is 
a program written in BASIC, which does this automatically. 

It is used as follows. First load your machine language 
program. Then type in the following BASIC program and RUN 
it. You are now asked to enter the starting and ending 
addresses of the machine language program. The program 
creates a complete loader program on the printer with an 
automatically generated checksum. The checksum is simply the 
sum of all the values. The values are summed while being 
loaded and the checksum contained within the program is 
checked against the value generated by the program. If the 
two values aren't equal, an appropriate message is 
displayed . 

By doing this you can determine if the user made an error 
while typing in the data. 



100 OPEN 1,4 : Z - 100 

110 INPUT '"START ADDRESS " f A 

120 INPUT "END ADDRESS ";E 

130 CMD1 : PRINT Z "FOR I =" A "TO" E 

140 I=A : 2=2+10 : PRINT Z "READ X : POKE [,X : S=S+X : NEXT" 

150 Z=Z+10 : N=0 : PRINT Z "DATA "; 
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160 
170 
180 
190 
200 

210 
220 



X=PEEK(I) : S=S+X : 
IF I=E THEN PRINT 
1=1+1 : IF N=12 THEN 



PRINT RIGHTS (' 
GOTO2 00 
PRINT:GOTO150 



'+STRS(X) ,3) ; :N=N+1 



PRINT ","; :GOTO160 

PRINT Z+10 "IF SO" S "THEN PRINT" CHRS(34) "ERROR 
IN DATA !!" CHRS(34) : PRINT " : END" : END 
PRINT Z+20 "PRINT " CHRS(34) "OK" CHPS{34) 
PRINTS! :CLOSEl 
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11. 6510 Disassembler 

This section contains a program called a disassembler. The 
purpose of a disassembler is to translate machine language 
programs in memory back to the mnemonics used for entering 
assembly language programs. Prom the sequence SA9 , $80, for 
example, the disassembler generates LDA #$80. The 
disassembler is simply started with RUN and it asks for the 
starting and ending addresses of the memory range to 
disassemble. The output then appears on the screen, but it 
can be redirected to the printer with an appropriate OPEN 
instruction and CHD assignment. 

Here's a brief description of the operation of the 
disassembler. The program gets a byte from memory and 
interprets it as an operation code. This op code serves as 
an index in a table of instruction mnemonics, instruction 
lengths and addressing modes. The disassembler knows the 
form of the operand and where the next instruction begins 
from these tables. 

The disassembler can be used for your own machine language 
programs as well as for the disassembly of the operating 
system and BASIC interpreter. You can often find hints and 
tips for your own programs there. Better yet is the 
commented listing of operating system which you can find in 
The Anatomy of the Commodore 64. 
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Here is the disassembler listing. 



100 REM 6510 DISASSEMBLER 

1 10 DIMMIM*<255> ,AD<255> ,Ht I 15) 

120 FF=255:Hl=25f>:UL=2T 16>SG=2 1 15-1 

130 PRINT" CCLRJCC/DNJ CC/DN3 {C/DN: [C/RT3 CC/RTJ CC/R1 > tC/RTJ <C/RTMC/R13 

iC/RlIil .HI I CC/RT: CC/RT: (C/RTJ4510 DISASSEMBLER" 

140 F0ftl=0TO15:READH*< I I iNEXI 

ISO FQR[=0TU255:READMN.t < I > , AD ( I I : NEXT 

160 PRINT" CC'DNJSTART ADDRESS:- *****{C/LFXC/LF> tC/LF> <C/LFJ f C/LF1 

170 G0SUB540:S=A 

ISO PRINT" IL/DNIEND ADDRESS :- T«***(t/LF) CC/LF; CC.'L.F; CI II CI II 

IC.'LF; "s : iriPUTAt:PR[NT 

190 G0SUB540:E=A 
200 FORP=STDE 

210 A=P:GOBUB450:REM ADDRESS 

220 PRINT" "; : A=PE£K <P> : G0SUB4BO: PR ] NT " "j:I=PEEI I P I : LIP=A1J < 1 > 
230 ON0PG0SU651 , 520 ,520 ,51 . S30 . 5 ZO, 521 1 .530 , 530 , 520 , 520 , 520,530 
240 PRINT" "iMN*l I ) " " i 

250 0NDPG0SUB270, 280,290, 300, 310, S20,330, 540,350,360,370, SBO,400 
260 NEXTP:GQT0160 
270 PRlNTsREIURN 

2B0 PRINT"*"; :6USUB490:F' = F + 1:PR1N1 :RE1URN 
290 G0SUB490-. P=P+l:PRINt : RETURN 
300 PRINT" A":RETURN 
310 BClSUB420:P=P+2: PRINT i RETURN 
320 G0SUB490:P=P+1 :PRINr" .X":RETURN 
330 GQSUB490:F = P-H : PR I NT" ,Y": RETURN 
340 BQSUB420IP-P+2: PRINT" ,X":RETURN 
350 B09UB420 1 P=P+2 ! PRINT" ,Y": RETURN 
360 PRINT" ("| :GOSUB490:P=P+I;PRIN1 ") ,Y"sRETURN 
370 PRINT" I "; : GQSUB490: P=P+1 : PRINT", X) " I RETURN 
380 T-PEEK1P+1 ) : D=T+HI* (T >127)+2+P 

390 A=INT<D/HI)*HH-( <Q+(Q ;SC> »UL > ANDFF> : PRINT"*": : UTSIJB450I P=P+1« 
400 PRINT" C j :GQSU&420 
410 PRINT" I " i P»P+2: RETURN 
420 PRINT"*" ; 

430 A=PEEK(P+1 >+HI*PEEI tP+21 
440 REM HEX ADDRESS A 
450 HB=INT<A/HI> : A=A-H[»HB 
460 PRINTH*(HB/16)H*(HBAND15) ; 
470 REM HEX BYTE A 

4S0 PR I NTH* <A/16)H4 (AAND15) ; : RE rURN 
490 PRINT"!" : 
500 A=PEEK(P+1 ) :(3QTQ48u 
510 PRINT" "J : RETURN 
520 6aSUB500:PRINl"" ":;RErilRN 
530 GOSUB500:PRINT" " s : A=PE£I CP+2) : GOTO4S0 
540 IFABC(fl*)=42fHENENB 

550 A=0:F0RI = 1TD4: V=fiSC<RIGHTt (AJ, I) >-4t',:" , '+ • ' ()» :A=A+V*<14»1 
I 1-1 > ) I HEX I sRP II IRN 
1000 DATA 0, 1, 2, 3, 4, 5, h, 7,8, 9, A, B, I ,D,E,I 



1010 DATA"BR( " , 1 , 

1020 DATA"' 1 . 

1030 DATA"ASI " , :. 
1040 DATA"0RA",2. 
1050 DATA"???", 1 , 



IIP:,, 



ASL 

DRA 



,11, .1 

, 1 , "ORA" . J 

,1 , "FHP". 1 

' ,4, " ? ' " . 1 

:> , "ASL" , j 



195 



The Machine Language Book of the Commodore 64 



1060 
1070 
1080 
1070 
1100 
1 I 1 o 
1 1 20 
1 1 30 
! 140 
1 130 
1 1 60 
1 ! *0 
1180 
I 190 
! 200 
] 210 
220 
1 2 50 
1240 
1250 
1260 
1270 
' I H 
i 291 
i 00 
1 3 1 
1 320 
1 330 
1 S40 
1 350 
! 56i I 
1 370 
1 5BI ' 
1 590 
1 400 
1 -1 1 
] 420 
I 4 S< I 
1440 
1450 
1 460 
I 4 ■>.• 

I 4iiU 

1 490 

1510 
1520 

! '. (0 

! 540 
550 

i : i60 

1570 
1 5B0 
1 590 

1610 

i 620 
1630 



DATA' 
DATA 1 
DATA' 
DATA' 
hi,],,- 
DATA' 
DATA' 
DATA' 
DATA' 
DATA' 
DATA' 
DATA' 
DATA' 
DATA' 
DATA' 
DATA' 
DATA' 
DATA' 
DATA' 
DATA" 
DATA' 
DATA' 
DATA' 
DATA" 
DA1A" 
DATA" 
DATA" 
DATA" 
DATA" 
DATA" 
DATA" 
DAI A" 
DATA" 
DATA" 
DATA" 
DATA" 
-.! ,-," 
DATA" 
DATA" 

L " 

DATA" 
DATA" 
DATA" 
DATA" 
DATA" 
DATA" 
DA I A" 
DATA" 
DATA ■ 
DATA" 
DATA" 
DATA" 
DATA" 
DATA" 
DATA" 
I Hi In" 
DA I A" 
DATA" 



OR A' 
CLC 

ASL' 
AND' 
BIT' 

ROL' 

AN1 ' 
BMI ' 

ROL 1 
HMD 
77?' 
??7' 

7****3" 

EUR' 
RHA' 
7*7*3 ■ 

LSR' 
EOR' 



EOR' 
RTS' 
777 1 

ROR' 
ADC 
JNP' 

77?' 

ADC 
SE I ' 

RDR' 

S1A' 

'. .IV 

(A 1 

ST A' 

BCC' 

■ l i ■■ ■ 

■ !TA' 



LDX' 
LDA' 

VAV 

I I' 
I DA 
LDY" 

rsx" 



, 1 , ""' , 1 

"AND" ,3, "ROL", 3 

"PLP" ,1 , "AMD ",2 

"???",!, "BIT", 5 

"ROL", 5, "???", 1 

2, "AND" , 10, "???", 1 

, "77?" , 1 , "AND", 6 

",1,"5EC",1 

I , ,1 

l", S, "ROL" ,8 
, "Kl 1 " , 1 , "EOR" , 11 
,"???", 1 ,"??7" , i 
, "LSR" ,Z,"t>'>" , 1 





"CLI 



u , i n, , u 

1 ,"E0R",9 

,1,"? ■■■", 1 

"LSR" ,8,"??7" , 1 
'ADC" ,11, "777" , | 

"" 



RLIL ,11, ' ' ' , I 

"77?",1,"ADC",3 

•" , 1 , "PLA", 1 

'ROR" ,4, "- 1 , 1 

P .,"ADC" ,5, "ROR",: 



'ADC" ,5, "ROR" 
■BVS" , 12, "ADC 

177'in j n ■-.-■>■ .,,, 
'TOR" ,6. "7? 
'ADC" 



,10 



i "ADC", 9, "7 . 1 

, " " , 1 ,"ADC" ,B 

,"■???'■, 1," 1 

I," ' " , I . "V77", 1 
1 ,3,"STX" ,3 
„ | , - _ j , ..-.->■.,, i j 

" ' ' " , 1 , "STY", 5 
"STX",5,"???" , 1 
:, "BtA", 10,"???", i 

"STY" .6, "STH",6 
"?? '" , 1 ,"TYA", 1 
ii | ■,,;.■ _ j ) "777", | 

"til A" ,9, " ' ■ , i 
"I In " ,2, "LDA", 11 

1 , "LDY" ,3 

"LDX", 3, "''??», 1 
"LDA" ,2," I AX" , 1 
"I Hi " ,5, "LDA", 5 
'" . I ,' - BCS", 12 
1 ■ ' "' . i . "7 , ] 

] I.,," 

CI V" , 1 , "LDA" ,9 
■'■'", 1 ,"LDY",a 
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1640 DAtft"LDA",8,"LDX" ,V, ■■ ??' ■' , 1 
lfaSO DATA"CPY",2,"CMP",ll,"" ',) 

IbbO DATA""'?''" , 1 , "CPY" ,3, "CMP" ,3 
lo/O DATA"DEC" , 3,"^' 1 ?" , 1 , "INY", I 

1680 DATA"CMP" ,2, "DEX" , 1 , ?7" , J 

1^90 DATA"CPY" ,5, "CMP" ,5, "DEC", 5 
1700 DAT<V" , -." ,, ' , 1 , "BNE", 12, "CMP" , 10 

I ? 10 DATA >" ,1 , "777", 1 , "77?" , 1 

1720 DATA"CMP" ,4, "DEC" , b , "~->7" , 1 
1730 DATA"CLD" , 1 , "CMP" ,9, "777" , 1 
1740 DATA"???" , 1 , »???■', 1,"CMP",B 
1750 DATA"DEC" ,8,"???" , 1 , "CPX" ,2 

1760 DATA"SBC",il ,"???", 1, .1 

! 770 DATA"CPX",3,"SBC" ,3, "INC" ,3 
17B0 DATA""'''""', 1 ," 1NX" , 1 , "BBC", 2 
1 791 p DATA"N0P", 1 ,"•?->?■' , 1 , "CPX" ,5 

1800 L)ATA"SBC",5,"INC" ,3," ?', , 1 

IBIO DATA"BEQ", 12, "SBC" ,10, "???" , 1 
1820 DATA"??^"' , J , "???" , 1 , "SBC" ,6 
1830 DATA" INC" ,h, ■■???« , 1 , "SED", 1 

1840 DATA'^BC","?, "77?" , 1 , 

18S0 DATA"?^?",1 ,"BBC",B,"INC",B 
IB&O DATA"'' - '?" , 1 
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Program Description 
100 - 150 Initialization; build tables 

160 - 190 Prompt for starting and ending addresses for the 
disassembly and conversion to decimal. 

200 - 260 FOR-NEXT loop for disassembly from starting to 
ending address. Line 220 gets the instruction 
code and the current address is output. Line 230 
outputs the operands depending on the address 
mode. Line 240 outputs the instruction mnemonic. 
Line 250 displays the operand corresponding to 
the addressing mode. Line 260 ends the loop and 
jumps back to the input. 

280 - 410 Output the operand as the address mode dictates. 

420 - 530 Output hexadecimal forms of bytes and addresses. 

540 - 550 Conversion of a hex number to decimal. 

1000 - 1860 Tables containing the instruction mnemonics and 
addressing modes. 
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Variable Description 

MNS(255) Table of instruction words 

AD(255) Table of address modes 

H$(15) Field with hex digits 

FF constant 255 

HI constant 256 

UL constant 65536 

SC constant 32767 

AS string variable for hex number 

S start address 

E end address 

P program counter 

OP addressing mode 
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12. Using a Machine Language Monitor 

Here's another tool to aid in machine language development. 
The tool is called a monitor. 

A monitor can be used to enter machine language programs. 
You can displays and changes the contents of memory 
locations and the registers. Additionally, you can save and 
load machine language programs to tape or diskette. You can 
execute machine language programs from it. If you end such a 
program with a RRK instruction, control is returned to the 
monitor and the contents of the registers are be displayed. 

The following is an explaination of the commands available 
with the SUPERMON monitor. SUPERMON is a public domain 
monitor written by well know Commodore expert Jim 
Butterfield who has given us so many useful tools. SUPERMON 
is available free of charge from many sources including most 
local user groups. We have explained the use of SUPERMON 
beacuse it is so widely available. 

SUPEPMON is started by LOAD "SUPERMON" , 8 and activated 
with RUN. The monitor responds with: 

..JIM BUTTERFIELD 

B* 

PC SR AC XP YR SP 
.; 9835 31 40 E6 00 F6 

B indicates that the monitor was entered by "BRK". 
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The labels are as follows: 



PC program counter 

SR status register 

AC accumulator 

XR x-register 

YR y-register 

SP stack pointer 



The contents of those registers appear below the labels. You 
can change the contents of any register by moving the cursor 
over the old contents, overwriting it with the new value, 
and pressing the <RETURN> key. if you want to change the 
flags, the status register must be changed. 

SUPERMON uses the period . as its prompt. When you see the 
period on the screen, SUPERMON is asking you to enter a 
command. 

You can display the register contents at any time by 
entering R at the prompt; 

.R 

and pressing the <RETURN> key. The contents of the registers 
is displayed, just as above. 

The next command displays and allows you to change tie 
contents of memory. At the prompt, enter M followed by the 
first and last address you wish to see. The starting and 
ending addresses are entered as four-digit hexadecimal. 
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numbers such as: 



.M AOAO AOAF 

.: AOAO C4 46 4F D2 4E 45 58 D4 

.: A0A8 44 41 54 CI 49 4E 50 55 



SUPERMON displays the contents memory below your entry. You 
can interpret the output in the following way: 

An address is displayed after the colon. This is the address 
of the first of eight following bytes. In this example, 
address SA0A0 contains the value $C4. Address $A0A1 contains 
$46, and so on. A total of eight bytes are displayed per 
line. SUPERMON displays as many lines as specified by the 
address range which you entered. 

To change a single byte in memory, move the cursor over the 
old value, type in the new value, and press the <RETURN> 
key. 

If you want to execute a program, use the instruction G, If 
the program starts at address SCF20, enter 

.G CF20 

This begins the execution of a machine language program 
beginning at the specified address. First, however, the 
registers are be loaded with the values displayed with the R 
command. The last instruction in the machine language 
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program should be BRK which causes execution to return to 
the monitor when the program is done. When a BRK is 
executed, the register contents are then automatically 
displayed, as below: 



B* 

PC SR AC XR YR SP 

.; CF39 B3 8F 73 BO F6 



The B indicates that your program ended with a BRK 
instruction and that the monitor was entered by means of 
this BRK instruction. The program counter points to the byte 
immediately after the BRK instruction. If you have several 
BRK commands in your program, this information tells you at 
which point your program was stopped. 

Knowing this, you can develop the following method for 
testing and debugging programs. Place BRK instructions at 
all of the important locations in the program so that the 
program stops at these points. Then check the register 
contents and data in memory. If the program has run properly 
up to this point, replace the BRK instruction with the 
original instruction and place a BRK instruction at the next 
critical location. This way you can test your program step 
by step until it runs to your satisfaction. 

Loading and saving programs is accomplished through the use 
of the L and S commands. The following syntax is used: 

,L "NAME", XX 
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To load a program type the name of the program in 
quotation marks followed by a comma separating it the device 
address given as a two-digit hex number area . If you want 
to load the program GRAPHIC from disk, for example, the 
instruction would look like this: 

,L "GRAPHIC" ,08 

If you want to load from cassette, you use the device 
address 01. 

.L "GRAPHICS", 01 

The SAVF. command works the same way. Because the computer 
must know the memory range to save, it is necessary to give 
a starting and an ending address. The ending address must be 
one greater than the last byte you want to save. The command 
looks like this: 

.S "PROGRAM" ,08,7000,8000 

It writes the memory range from S7000 to S7FFF to the disk 
under the name "PROGRAM". Here too the device address 01 can 
be entered in order to save to the cassette drive. 

Another function of SUPERMON is the built-in disassembler. 
By entering D followed by an address range you can display 
machine language programs on the screen in disassembled 
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format. The format is the same as that used by the 
disassembler written earlier in BASIC. If you enter the 
following instruction: 

•D B824 B82C 

the following is displayed: 



. , B824 


20 


EB 


B7 


JSR 


SB7EB 


., B827 


8A 






TXA 




., B828 


A0 


00 




LDY 


#S00 


., B82A 


9] 


14 




STA 


(S14) ,Y 


., B82C 


60 






RTS 





We disassembled a part of the BASIC interpreter which 
performs the POKE command. 

Another useful command in SUPERMON allows one area of memory 
to be copied to another. Enter the starting and ending 
addresses of the area to be copied and the starting address 
of the destination area. The contents of the original area 
are left unchanged. 



.T 6000 6FFF 3000 

copies the area from S6000 to $6FFF to the addresses from 
53000 to S3FFF. 

Another useful function hunt command. With this command you 
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can search for specific values in memory. The results 
displayed are the addresses at which those values are found. 

.H E000 EFFF 20 D2 FF 

searches through the memory range from SE000 to $EFFF for 
the values S20, $D2, SFF. This command will display a list 
of addresses at which these values were found. In this 
example we would see: 

E10C 

SUPERMON found the values 20 D2 FF at the area of memory 
starting at E10C. 

Another command fills memory with a particular value. With 
this you can fill a range of memory with constant values. 

.F 8000 8FFF 00 

fills the area from $8000 to S8FFF with zero bytes. 

You can use the next command to assemble single lines of 
machine language. By entering the following: 

.A 0S00 LDA #SFF 

SUPERMON will assemble the machine language codes A9 FF into 
memory beginning at 50800. This function makes it easy to 
enter short machine language program. 
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The last command exits from SUPERMON and returns you to the 
BASIC interpreter. Simply enter: 

.X 

and the interpreter will respond with READY. If you later 
wish to use the monitor again, you can return to it by 
entering 

SYS 49152 
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APPENDIX A - 
Addressing Modes and Operation Codes 



ADDRESSING MODE 

ZP AB ABX ABY ZPX ZPY ,X) ),Y 

6D 7D 79 75 - 61 71 

2D 3D 39 35 - 21 31 

OE IE - 16 - 

2C ----- - 

CD DD D9 D5 - CI Dl 

EC ----- - 

CC ----- - 

CE DD - D6 - 

4D 5D 59 55 - 41 51 

EE FD - F6 - 

AD BD B9 B5 - Al Bl 

AE - BE - B6 - 

AC BC - B4 - 

4E 5E - 56 - 

OD ID 19 15 - 01 11 

2E 3E - 36 - 

6E 7E - 76 - 

ED FD F9 F5 - El Fl 

8D 9D 99 95 - 81 91 

8E - - - 96 - 

8C - - 94 - 



MNEMONIC ■ 

* 


A 


* 


ZP 


ADC 


- 


,. g 


65 


AND 


- 


29 


25 


ASL 


0A 


- 


06 


BIT 


- 


- 


24 


CMP 


- 


C9 


C5 i 


CPX 


- 


E0 


E4 


CPY 


- 


CO 


C4 i 


DEC 


- 


- 


C6 i 


EOR 


- 


49 


45 


INC 


- 


- 


E6 


LDA 


- 


A9 


A5 , 


LDX 


- 


A,! 


A6 


LDY 


- 


AC 


A4 


L.SR 


4A 


- 


46 


ORA 


- 


09 


05 


ROL 


2A 


- 


26 


ROR 


6 A 


- 


66 


SBC 


- 


E9 


E5 


STA 


- 


- 


85 


STX 


- 


- 


86 


STY 


- 


- 


84 ! 
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APPENDIX B 
Grouped Instructions 



Branch BPL BMI BVC BVS BCC BCS BNE BEO 

instr. 10 30 50 70 90 B0 DO F0 

Transfer TXA TAX TYA TAY TSX TXS 

Instr . 8A AA 98 A8 BA 9A 

Stack PHP PLP PHA PLA 

Instr. 08 28 48 68 

Jump BRK JSR RTI RTS JMP JMP NOP 

Instr. 00 20 40 60 4C 6C EA 

Flag CLC SEC CLI SEI CLV CLD SED 

Instr. 18 38 58 78 B8 D8 F8 



Inc/Dec DEY INY DEX I NX 

Instr. 88 C8 CA E8 
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APPENDIX 


c 


Conversion Table Decimal - 


■ Hexadec 


Decimal 


Hex 


Binary 


Decimal 





00 


00000000 


49 


1 


01 


00000001 


50 


2 


12 


00000010 


51 


3 


03 


00000011 


^2 


4 


i)4 


00000100 


53 


': 


05 


00000101 


1 


1- 


06 


00000110 


55 


7 


07 


ooooom 


56 


B 


08 


00001000 


57 


9 


09 


00001001 


58 


LO 




00001010 


29 


] i 


OB 


00001011 


60 


12 


oc 


00001100 


6] 


13 


0D 


00001101 


62 


14 


0E 


00001110 


<:.i 


15 


■ i 


00001111 


6 ■'. 


16 


10 


00010000 


65 


17 


1] 


00010001 


66 


L8 


i 2 


00010010 


67 


19 


1 3 


00010011 


,io 


20 


L4 


00010100 


69 


21 


15 


00010101 


71) 


22 


16 


00010110 


71 


2 ! 


17 


000101 11 


7 2 


24 


18 


00011000 


73 


2 3 


19 


00011001 


74 


26 


i ■■■. 


00011010 


75 


27 


IB 


00011011 


76 


28 


: c 


00011100 


77 


29 


<:.■ 


00011101 


78 


30 


IF 


00011110 


7:> 


31 


IE 


00011111 


80 


32 


20 


00100000 


Bl 


1 ■ 


21 


00100001 


82 

8 3 


34 


2 2 


00100010 


35 


23 


ooiooon 


B4 


36 


2-1 


00100100 


85 


37 


25 


00100101 


86 
87 


38 


26 


00100110 


39 


27 


00100111 


B8 




28 


00101000 


89 


41 


29 


00101001 


90 


42 


2/- 


00101010 


9 : 


43 


2E 


00101011 


'.: 


44 


2C 


00101100 


93 


45 


2 T 


00101101 


9 A 


46 


2E 


00101110 


95 


47 


2F 


00101111 


■r 


48 


30 


00110000 


17 

98 



Hex Binary 

31 00110001 

32 00110010 

33 00110011 

34 00110100 

35 00110101 

36 00110110 

37 00110111 

38 00111000 

39 00111001 
3A 00111010 
3B 00111011 
3C 00111100 
3D 00111101 
3E 00111110 
3F 00111111 

40 01000000 

41 01000001 

42 01000010 

43 01000011 

44 01000100 

45 01000101 

46 01000110 

47 01000111 

48 01001000 

49 01001001 
4A 01001010 
4B 01001011 
4C 01001100 
4D 01001101 
4E 01001110 
4F 01001111 

50 01010000 

51 01010001 

52 01010010 

53 01010011 

54 01010100 

55 01010101 

56 01010110 

57 01010111 

58 01011000 

59 01011001 
5A 01011010 
5B 01011011 
5C 01011100 
5D 01011101 
5E 01011110 
5F 01011111 

60 01100000 

61 01100001 

62 01100010 
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Decimal 


Hex 


Binary 


Decimal 


Hex 


Binary 


99 


63 


01100011 


148 


94 


10010100 


100 


■-■- 


01100100 


149 


.,- 


10010101 


101 


65 


01100101 


150 


96 


10010 110 


102 


6 6 


01100110 


151 


97 


10010111 


103 


s " 


01100111 


152 


98 


10011000 


104 


63 


01101000 


153 


99 


10011001 


105 


69 


01101001 


154 


MA 


10011010 


106 


6A 


01101010 


155 


9B 


10011011 


107 


6B 


01101011 


156 


9C 


10011100 


108 


6C 


01101100 


157 


9D 


10011101 


109 


SD 


01101101 


158 


9E 


10011110 


110 


6E 


01101110 


159 


9F 


10011111 


111 


6F 


01101111 


160 


RO 


10100000 


112 


: ' 


oinoooo 


161 


A 1 


10100001 


113 


t : 


011 10001 


162 


■■ 2 


10100010 


114 


72 


01110010 


163 


A3 


10100011 


115 


73 


01110011 


164 


M 


ioiooioo 


116 


74 


01110100 


165 


A5 


10100101 


117 


75 


01110101 


166 


'■.f 


10100110 


1 '. - 


76 


01110110 


167 


AT 


10100111 


119 


"? 


01110111 


168 


A8 


10101000 


120 


78 


01111000 


169 


A'' 


10101001 


121 


79 


01111001 


170 


AA 


10101010 


122 


7A 


01111010 


171 


Ah 


10101011 


123 


7B 


01111011 


172 


AC 


10101100 


124 


7C 


01111100 


173 


AD 


10101101 


125 


7D 


01 111101 


174 


AE 


10101110 


126 


7E 


01111110 


175 


Al- 


10101 1 11 


127 


7E 


01111111 


176 


BO 


10110000 


128 


BO 


10000000 


177 


Bl 


10110001 


129 


:-■ 1 


10000001 


178 


rl 


10110010 


130 


B2 


10000010 


179 


B3 


10110011 


131 


83 


10000011 


180 


B4 


10110100 


132 


:•' 4 


10000100 


181 


B5 


10110101 


133 


85 


10000101 


182 


B6 


10110110 


134 


B6 


10000110 


183 


B7 


10110111 


135 


B7 


10000111 


184 


B8 


10111000 


136 


H 


10001000 


185 


B9 


10111001 


137 


-■9 


10001001 


186 


BA 


10111010 


138 


B A 


10001010 


187 


BB 


10111011 


139 


BE 


10001011 


188 


BC 


10111100 


140 


8C 


10001100 


189 


BD 


10111101 


141 


8D 


10001101 


190 


BE 


10111110 


142 


UK 


10001110 


191 


at 


1011 1111 


143 


- V 


10001111 


192 


CO 


11000000 


144 


90 


10010000 


193 


Cl 


11000001 


145 


9 1 


10010001 


194 


C2 


11000010 


146 


92 


10010010 


195 


C3 


11000011 


147 


93 


10010011 


196 


(~ 


11000100 
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Da c i m a 1 


Hex 


Binary 


Decimal 


Hex 


Bi nary 
1100011 


197 


C5 


11000101 


227 


E3 1 


198 


C6 


11000110 


228 


E4 1 


1100100 


199 


C7 


11000111 


229 


E5 1 


1100101 


200 


C8 


11001000 


230 


E6 1 


1100110 


201 


C9 


11001001 


231 


E7 1 


1100111 


202 


CA 


11001010 


232 


E8 1 


1101000 


203 


CB 


11001011 


233 


E9 1 


1101001 


201 


IT 


1 1001 100 


234 


EA 1 


1 101010 


20 5 


CD 


11001101 


235 


EB ] 


1101011 


206 


CE 


11001110 


236 


EC 1 


1101100 


207 


CI 


11001111 


237 


ED 1 


1101101 


208 


DO 


11010000 


238 


EE ] 


1101110 


209 


Dl 


11010001 


239 


EF 


11101111 


210 


D2 


11010010 


240 


F0 


LI 110000 


211 


D3 


1 1010011 


241 


Fl 


tl 110001 


212 


D4 


11010100 


242 


F2 


L1110010 


213 


D5 


11010101 


243 


F3 


L1110011 


214 


D6 


11010110 


244 


F4 


L1110100 


215 


07 


11010111 


245 


FS 


LI 110101 


216 


nft 


11011000 


246 


F6 


L1110110 


217 


D9 


11011001 


247 


F7 


LI 1 101 1 1 


218 


; a 


11011010 


248 


F8 


L 1 1 11000 


219 


DB 


11011011 


249 


F9 


L 11 11001 


220 


DC 


11011100 


250 


FA 


L1111010 


221 


DD 


11011101 


251 


FB 


11111011 


222 


DE 


11011110 


252 


FC 


11111100 


223 


DF 


11011111 


253 


FD 


11 111101 


224 


EO 


11 100000 


254 


FE 


11111110 


225 


El 


11100001 


255 


FF 


11111111 


226 


E2 


11100010 
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r: 

■- 

E 
3 


a. i. t. i. 

NNNM 


a. 


ft. 


X 

_ ft - 

W fri M 


>• 


:. 
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a. 


X X 

EC ft a. 

M N ^5 


- J - J 

< < tz Si 


K 
Efl 


CM 


a ie x 
□ Oh 
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X 

ifl 


X 
12 


X 

c 

_: 


n 


U U U 
U3 S Z 

Q — M 


X X 

li. a, a, a. 

N 14 M N 




ft. 


X 

p. a, &, 


X 


ft. 


X 

a. 


ft. 

N 


X X 

ft. ft. ft. 
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OPERATION CODES AND FLAG SETTINGS 



* 


Bit map 


N V 


ADC 


011XXX01 


X X 


AND 


001XXX01 


X 


ASL 


oooxxxio 


X 


BCC 


1OO10OO0 




BCS 


10110000 




REQ 


11110000 




BIT 


0010X100 


M H 


BMI 


00110000 




BNE 


10010000 




BPL 


00010000 




BRK 


00000000 




BVC 


01010000 




BVS 


01110000 




CLC 


00011000 




CLD 


11011000 




CLI 


01011000 




CLV 


10111000 





CMP 


110XXX01 


X 


CPX 


1110XX00 


A 


CPY 


110OXX00 


X 


DEC 


110XX110 


X 


DEX 


11001010 


X 


DEY 


10001000 


X 


EOR 


010XXX01 


X 


INC 


000XX110 


X 


I NX 


11101000 


X 


INY 


11001000 


X 


JMP 


01X01100 




JSR 


00100000 




LDA 


101XXX01 


X 


LDX 


101XXX10 


X 


LDY 


101XXX00 





NOP 


11101010 




ORA 


oooxxxoi 


X 



z c 

X X 

X 

X X 



X 
X 

X 
X 

>: 

X 
X 
X 
X 
X 



X 
X 
X 
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Bit map 


N 


PHA 


01001000 




PHP 


00001000 




PLA 


01101000 


X 


PLP 


00101000 


X 


ROL 


ooixxxio 


X 


ROR 


011XXX10 


X 


RTI 


01000000 


X 


RTS 


01100000 




SBC 


mxxxoi 


X 


SEC 


00111000 




SED 


11111000 




SEI 


01111000 




STA 


100XXX01 




STX 


100XX110 




ST* 


100XX100 




TAX 


10101010 


X 


TAY 


10101000 


X 


TSX 


10111010 


X 


TXA 


ioooioio 


:■: 


TXS 


10011010 




TYA 


10011000 


X 



X 

X X 

X X 

X X 

X X 

X X 

1 



If the bit map of a instruction contains one or more Xs, 
these bits are dependent on the address mode. An X in a flag 
column indicates that that flag is affected by the 
instruction. A or 1 means that the flag is cleared or set, 
respectively. If no entry is given under a particular flag, 
the instruction in question does not affect that flag. 
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APPENDIX F 
OPTIONAL DISKETTE ORDERING INFORMATION 



The listings in this book for the LEA Assembler, 6510 
Single-Step Simulator, Disassembler and SUPERMON monitor are 
available on a ready to run 1541 Format Diskette. 

By purchasing this diskette, you can eliminate typing these 
programs into your Commodore 64 from the listings. 

The programs on the diskette have been fully tested and are 
available for S14.95 + $2.00 (S5.00 foreign) postage and 
handling charge. 

To order, send name, address and a check, money order or 
credit card information to: 

ABACUS SOFTWARE 

P.O. BOX 7211 

GRAND RAPIDS, MI 49510 

For fast service, order by phone - 616 / 241-5510. 



Be sure to ask for the "Optional Diskette for the Machine 
Language Book for the Commodore 64" 
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GET THE MOST OUT OF 
WITH ABACUS SOFTWARE 





XREF-64 BASIC CROSS REFERENCE 

'■ .%- |lf !MQ$e hitfd-tiu l>tid vd'.tuos injCHj' programs 

Crota 'iterance* »N Tokens <*i<y wCudll variable* and conswnl'S m soiled 
OfrJVr ¥uu On Pvi-n JduJ you OWfl lgl*en* Ircm olh«r scHware St*cn as 
Ul THAFJAS'C (if VK IMI E - II" )! » BMMn CM ill ASCII DN-nter* 

DISK II7.99 

SYNTHY-64 

Thu >s lenawned a* mo lines I music synjhe suits . w .i ■ I a t l.e dl any pnte 
Ot"c<s may nat* a lot of onscreen M& tmi SywThy £4 mates mui< Dene' 
;hjr rhem all Nothing CGmes clow lo In* pCurma^CC C' 0MS PKfcigfl 
- mull Anih lulo'iai id"n&ie mus< 

DISK 127 95 TAPE 124.95 

ULTRABASIC 64 

Tin* package adds SQ powerful i 

<*:*,.«., hlHes mulm Den c* 
mo-,e turn ma!.; 



IM 



.. h • 



Tiffltmta |mif>y found «i VIDEO BASIC 
fV ORClt BO FILL JO* TURTLE 

■ R , T E >1 T A * f 

n • n> ;-Jl tut&fuji and demo 

DISK S27SS TAPE 124 95 



CMAR-IPAK 64 

Thai ftfMt&l thaiMig pKUma di4w» im bail hats and gtiph»tioni 

-,i,mi i!,Hd c» Dl c Wuliyai' a ^t) Bus-caic Mrs C»-artv are drawn in any ol 
Ztoimtts Clung* (oimal ai ■ *rt m- mediately Mardcopi 

toMPSBOl Ep^G'i CjKKldld PrgmMei InCtudet manual and luional 

DISK 1*2.95 



CHAKfPl Of-bJ 

'■■"■'■ 
pkiJiers 

DEALER INQUIHItS ARE INVITEU 



DISK sai 95 



CADPAK-G4 

Th.i advanced design package n«s euisiandmcj features • i*o Hrtl 
screens, dra# LINE*. HAVs, CIRCLE*. BOXEs I'echand OOAW, FILL With 
patterns. COPV ifejs SAVEiRECALL p-Ouie» deiine aw uie militate 
OBJECTS, inson lesion sewn, UNDO l*sl Tuntlion Requires Ugh quality 
iightpen We rvcommend UcPfin includes manual with tutorial 
DISK 149.9S M-cPen lighipen 149 95 

MASTER 64 

■ !■--■- -■: ■:; :e :■- .> ,~ jpmtnl package adds tOO powerful 

commands id BASIC TCiud>ng '>si ISAM ndexed U*s. simpii-ed ret 
MptKSlCaltd S'.rccn and punier managemenl, programmer's 44. BASIC 
■l commands, Z? digit arithmetic, nrnchnie language monitor Runtime 
package lor royaltyliee diainbul on ol your programs Includes l50pp 
manual 

DISK it* 95 

VIDEO BASIC64 

Ths jup*fb graphic* and sou^d development package lets you ttttie soft 
-..■■* ■;- : ;-,-; r.,- .■.-;.:■.; ..■ : ■■■ Mas hires rnuttHJ* ■; I ■■:■ *■ J 

!ur:le graphrCS amCO commands '0' simple or conplex music and sound 
ellecls two sues of harfic^p/ ID must ddl maun pnnters. gime leatu'cs 
lutf as sprite collision detection tigmpen, game paddle, memory 
management l> m u ll<Dle giaphici screens, screen copy e!c 

DISK 159 95 

TAS-64 FOR SERIOUS INVESTORS 

Thtt sopricsiicaied chaamg system picis moo mm 1 5 lechmGii indicators 
on split sceeen mo v .ng a-etages. DSC'ttahys. I^aeliog orands. '«asi squares. 
I'erd lines supermpese graphs, live volume mCKaUDS, reUlme Strength 
.cumes. more Online data collection OJNR'S or TAarnef l?5pp manual 
Tuwai DISK IE4.»S 



FREE CATALOG Ask for a listing ol other 
Abacus Software lor Commodore-64 orVlc-20 



rjAffUtUluNS 

Brtet IrftiJa: 
Arjiiiiton 

■ ft kfiJTrcft ».» 
- i. :j« Ltnci 



B«|ylm. imu 1" ZHiaaf 

irrtu S.«h UCSO APPltAIOh V&XjJhT ElEC!B0h«5 

AWuu4i.ma 3fj 14 T A. ( n. jt Plwl-thuni*t ->»*» t««« SVM 

!«: -44* l7Ug£54 



SMHM 



W*tt Dinniiy: Iwi4m: 

DATA UCKEfl ILU TUDtNC 

Umwrqtrvj JO f«0 bt-i 

*0OC ^lutoon K*W *-i • • 

UMOI»U 4?S.t?1f.4 



Auttnjka. 
CWaECTNOMd 

a ' 6 LDftvi Road 
I BtM ..«-i 

Commodore 64 d a r«g TM of Dom-nodoni B<,vrwci Macn n« 



AVAILABLE AT COMPUTER STORES. OR WRITE: 

Abacus iH Software 



P.O. BOX 7211 GRAND RAPIDS. MICH. 49510 

For posugf & hindimg. irM (100 {US ind Ctnidll. !00 16 00 
lor rare^n Mila piymfnl li U.S doflirs by cft«k. monay ordir 
or chirg« CMl (Mich<ui RtsirMrm Idd 4H ukl tto) 

FOR QUICK SERVICE PHONE 616-241-5510 



"^ 






FORD 



HACKERS ONLY! 



DORE-64 



The ultimata source 
tor Commodore-64 
Computer information 




OTpIIR 900HS IVULMLi SOON 



THE ANATOMY OF THE C-64 

■S in* iflSNtti ■ ■,„ it rj "• EStd hno*n reitu'f. 0* 

Die Conunodorc w btauitn crupier* do Qiapfuii 
S5ut(J synfntvs •HMtatitDuf control whd* pracu-r". 

-:■■■-■ 
snow 1 includes Pit 
documented ROM i'SHfigs 
I SBNO-9 16439-00-3 300pp $19,95 

THE ANATOMY OF THE 1541 
DISK DRIVE 

.jnrarfSliJTveftiyvrcriesoluMnu ■' I 
drive DtUii'i ine use a! j]iagi.i < ..-"■■ ■.:■.■■ 
Ana dtrecl irxess lies Include many ■jimp* program^ 
fUE PROTECT WfUCTfJHV D6* U HITUfl 9ACKUI 
MEHGE COP* «ners Describes rtfemats 

I . .■■.-■, .. ■ ■.■■.-■■■-_ 

■-■; :. v 

I5BN-0 9t643901-1 



1 JOpp 



MACHINE LANGUAGE FOR C-64 
5 jiTi-a ii ini« «rtu #int to erogisss Deyiyid UASit 
«« memory enoertf program flmachrfie 
linage r«sl 6 SB«*C3ljf flWuO B Co«i*i 
Lewm J.l &S1D nSWutfiefiS IrtdaUCS bMiflCj I 
length piogrnms JS5SEMBIER DISASSEMBLER ami 
anwmg 6510 SIMULATOR so *ou on see- (He gui-m 
tw ol Tfw &« 
ISBN-O-916439-02-X 200pp S 14-95 

TRICKS & TIPS FOR THE C-64 

iS3CDHtt<iU'IOl^Sy 10 uve procuminiiniltt' 'h.|,ir ■ I I 
trie 64 A Bl'lt'i-I COmptfftirjr tor iriOM *fio n^t n.n 
uplQJin&l inajp hardTu i&ir j iQurarmnnrj pryplenn 
Cowers advanced (raphes euy a^ld npul BASK 
whjnctments CPfM £a*1r«Jge on tne 6-i POAEs use: 
rielLiKl tJli'jrirt: se'i tcysKk/BiDuE* WfjlJlon tins 

tertwg data bjNrtto Mrmuwj mo'e Aireasuteeflesl 

I5BN-0-9I6439-03B 250pp 119 9S 



GRAPHICS BOOK FOR 
THE C-64 

takes ,'LiL. ticm me (ufajmenuts ol fli*E"'t id 
Hlvanccd lopes socb as compiler a«]efl dtMjn Snows 
^afto* topfog:a^ne* cf.jfactei ieis mow . ' 
draw ii HiRIS ana MuiTiCOLOR uw 4 i^hOfto 
hanQic iRQi oo 3D ■gr.ipnci pro|C liow 
.n-n^riijn. hchidBs dotem si simflfes 

1SBN0-916439-O5-4 280pp * 19.95 

ADVANCED MACHINE 
LANGUAGE FOR THE C-64 

..•.■. ,■-■, .i.i miensMfl trMtmefli di "it powertui fcj 

features fiutnor Lamar EnojMti fiei^es mta ar^a^ -men 

-'•-,;'. irse widM controller trw Inner rhe real 

■...--■.-.--.,-.■■.:. 



SCIENCE/ENGINEERING 
ON THE C-64 

i ■" niroducliE" In lit nnxLfl o' enmcoiers in science 
,i!4ac* tyoes campuJai . :■-.. 

ramus Krt acgMn^i Toms induce xneat and 
egtessflfl CHt-sauare d:slrou!ion fajtier 
■ i . nairu ca-c«iiaiion*. more Programs Siom 
chemisiry physics oology JStirmpm k anrj i Klronics 
irciudr-i mjT»v etoflra-'i F r.Tmrji 
ISBN 916419 09 7 250pp 319.95 

CASSETTE BOOK FOR THE C-64 

(oi Vic 20) contains ail Hit inFcfrasmn /tiu n«d id 
knOW 4twu1 uS"id anrj rj[ootamm.ng The CommodDie 

Dausem ■' Jm ty r ■■■■■■■•:- (mgrarra Ai^crju- 

I ...... . E? . ,; ■- ,; t - 



ii< 9b 4SBNO 91643S.OE-2 200pp 5 14 95i ISBM-0^l6439Q4-6 ISOpp 



J 13 95 



ideas for use on your C-64 DEALER INQUIRIES ARE INVITED 



■ ■ ■' ■ i h a , 

it ■; *nOc 

■ H - ■ . i any uses ici you' 

COmptiler ThefBes inchse juTD eipensei Eie-Clrrjnit 
catuiai&f fECipe hte siccn lisii constfuciton ccsi 
"■stimaTDr rjtisrina: nej|:ti recanj del banner store 

'■■■"■ : 

ISBN-0-9 16439-07-0 200pp 512 95 



PRINTER BOOK FOR THE C-64 

l.ii^Hy siniphlius >Qgt ui rtHrMjrUini] g! lhe l!j25 
MPS/fiOi 1520 1526 ana fpson comsir: . 
Pa^ed *iin eM'nws ana utMV Droc/arrts you u Wm 
.. ^jjccmy oi i»ii ano gsasftc^ lw sfcri 
ear, *iWress?s pfcT m 3D *nd nii*cn mofe irttkjOes 
cgmirienist: fcihng o! MPS SO! ROMs 
iSBN.o.'MM:t9-oa-D 3S0pp. SlS.95 



IN CANADA CONTACT: 

Tre Boot Cantre. 114-a Bsnulac Sir«al 
Hontrflal. Oueaec H4FI1RB Phcna: i5I4j 122 -1154 

AVAJLA.BLE AT COMPUTER STOR£S H Ofl WRTTE: 

Abacus JmiiH Software 

P.O. BOX 7211 GRAND RAPIDS. Ml 49510 

txekuti* UI DATA RECKFH Pub-I.h.™ 

For poalagti handling *dd S-4 00 (U S and HHipi 

fJ*r.iCi| *<JJI6 O'JKi'li^Bign U»X* 3i, men' ^J^ 

h rt U S doiim b r cn«*. martiiy ouU»( B P _____^ 
cridfD* c»fO [Uicnig*,fl R*44*nit *m *H ; aflM^! 

"-» >•. i Vrt«V 



FOR QUICK SERVICE PHONE (614) 241-5510 






This introductory guide to machine language programing 
is written specifically for the Commodore 64 owner. You'll 
learn: to use all of the 6510 instructions; to program 
high resolution graphics; to perform input and output 
operations and more with plenty of easy-to-understand 
examples. 

Included are listings for a working ASSEMBLER, DIS- 
ASSEMBLER and 6510 Single Step Simulator. 



*OU C*N COUNT Oi4 

"Millliiii!! 



Software 



P.O. BOX 7211 GRAND RAPIDS, MICH. 49510 PHONE 616-241-5510 



